Pintado de xBrowse

[Marcelo Via Giglio]

Holas,

intento definir un xBrowe sobre un dialogo, y ambos estan sobre un windows, la idea es que cuando
se redimensiona la ventana, el xBrowse tambien lo haga, parte del codigo:

Code: Select all  Expand view

.....
ACTIVATE WINDOW oWnd ON RESIZE ResizeWnd( oWnd, oDlg, oGrid )

Function ResizeWnd( oWnd, oDlg, ogrid )
   local aClient

      aClient := GetClientRect ( oWnd:hWnd )
      oDlg:SetSize( aClient[4], aClient[3] - oWnd:oBar:nHeight - oWnd:oMsgBar:nHeight )
      oGrid:SetSize( aClient[4] - oGrid:nLeft, oDlg:nHeight - 2 )
      oDlg:Refresh()
      oGrid:refresh()

      return NIL

 

Pero me da un problema en el pintado


Estoy utilizando FWH9.06, alguna sugerencia

saludos

Marcelo