Bug en splitter

[quique]

No dice el tamaño correcto

Code: Select all  Expand view  RUN

#INCLUDE "fivewin.CH"
#INCLUDE "splitter.CH"

function main
   local oWnd, oSpl
   define window oWnd
   @ 107, 74 SPLITTER oSpl HORIZONTAL SIZE 333,4 PIXEL OF oWnd
   activate window oWnd on init wqout( { oSpl:nWidth, oSpl:nHeight } )
return nil


[quique]

Antonio ¿sabes como puedo corregir el error?

[Antonio Linares]

Quique,

Hazlo asi:

Code: Select all  Expand view  RUN

#INCLUDE "fivewin.CH"
#INCLUDE "splitter.CH"

function main
   local oWnd, oSpl
   define window oWnd
   @ 107, 74 SPLITTER oSpl HORIZONTAL SIZE 333,4 PIXEL OF oWnd
   activate window oWnd on init wqout( { WndWidth( oSpl:hWnd ), WndHeight( oSpl:hWnd ) } )
return nil


[quique]

Gracias, con eso funciona