Error with Treeview

[Eoeo]

I cannot show the vertical scroll in this simply dialog




the source code is

@ 0.2,0.2 TREE oTree OF oDlg SIZE 150,142 ;
BITMAPS { "SH_MATERIA","SH_PCLAVE" } ;
TREE STYLE nOr( TVS_HASLINES, TVS_HASBUTTONS, WS_VSCROLL )


How I can show the vertical scroll ?

I tried If I use resource ( define) there is not this error instaed of source ( @ x,y)

I forgot to say I use tree class of Goran Savckic because I had many problems in past with the actual tree class of fwh

[Eoeo]

Any solution ?

[Lailton]

You can try

Code: Select all  Expand view

__ChangeStyleWindow( oTree:hWnd, WS_VSCROLL, -16, .t. )

[Eoeo]

I tried with :

ACTIVATE DIALOG oDlg CENTERED ;
ON PAINT (oDlg:Move(aPoint[1], aPoint[2],,,.t.), ;
__ChangeStyleWindow( oTree:hWnd, WS_VSCROLL, -16, .t. ))

but not run !! it not make error and not make the vertical scroll