Page 1 of 1

TWBrowse vertical scrollbar always

Posted: Mon Dec 26, 2005 4:02 pm
by Enrico Maria Giordano
Is there an easy way to set the TWBrowse vertical scrollbar always showing even if there are no rows or one row only?

EMG

Posted: Mon Dec 26, 2005 6:45 pm
by James Bott
Enrico,

This is from an old message. I don't know if it works.
When a zero value range is set on a scrollbar, it becomes invisible,
so you may modify your bLogicLen codeblock to return one, when
it is zero:

Code: Select all

   <oBrw>:bLogicLen = { || If( NumberOfRecords == 0, 1, ... ) }
Regards,
James

Posted: Mon Dec 26, 2005 9:06 pm
by Enrico Maria Giordano
Unfortunately not. :-( I'm afraid that it is harder than this.

EMG

Posted: Tue Dec 27, 2005 12:32 pm
by Roger Seiler
Enrico,

I don't know if this will help, because it has to do with listbox instead of Wbrowse.

When designing a listbox in Borland Resource Workshop, in the properties dialog if you specify "scroll bar always" and then look at the code that RW generates, it inserts LBS_DISABLENOSCROLL in the code for the listbox. Maybe if you can discover how this works you may be able to apply the same concept to Wbrowse.

Good luck!

- Roger

Posted: Tue Dec 27, 2005 12:49 pm
by Roger Seiler
Enrico,

Here is another clue...

In scroll.c of fwh\source\winapi there is SIF_DISABLENOSCROLL

Maybe you can figure out how to use that.

- Roger

Re: TWBrowse vertical scrollbar always

Posted: Tue Dec 27, 2005 1:24 pm
by ask
EnricoMaria wrote:Is there an easy way to set the TWBrowse vertical scrollbar always showing even if there are no rows or one row only?

EMG
I would use <BrowseObject>:nstyle:=nOr( WS_CHILD, WS_HSCROLL,;
WS_BORDER, WS_VISIBLE, WS_TABSTOP)

regards
A.S.K

Posted: Tue Dec 27, 2005 1:27 pm
by Enrico Maria Giordano
Thank you. I made some experiment without luck... :-(

EMG