Ola amigos Estou querendo passar meus BROWSE para xBROWSE, mais estou encontrando dificuldades no seguinte quesito: Em LISTBOX faço desta forma Local aHBitMaps:= { LoadBitmap( GetResources(), "OFF" ), ; LoadBitmap( GetResources(), "ON" ...
... Eval( ::bKeyDown, nKey, nFlags, Self ) ) == "N" .and. ; uVal == 0 return 0 endif endif Como vc pode ver, desta forma tenho outras classes que herdam a TGET e executam 2x a mesma função, pois na classe WINDOWS.PRG if Upper( ::ClassName() ...
... INLINE ::nPaintCount--,; EndPaint( ::hWnd, ::cPS ), ::cPS := nil, ::hDC := nil //, 0 // keep this zero here! veja que estou comentanto o ZERO pois desta forma as minhas DIALOGS que tem VALID se encerram corretamente se coloco o ZERO "DEFAULT" não me encerra "finaliza" a DIALOG corretamente Espero ...
Estou passando todas as janelas para MDI com MDICHILD, e uma desta MDICHILD deve retornar um registro. Mas nao fica esperando a minha escolha passa reto e continua, porque a MDI nao fica esperando..
Alguem poderia me ajudar com ADS e ADT Tenho um arquivo indexado desta FORMA //----------------------------------------------------------------------------------------- IF ! File( DIRDBF + "SLBDPLOJ"+EXT ) IF !myUSE(DIRDBF+"SLBDPLOJ" , "LOJAS" ,.T. ,3,,xRdd ...
... Xharbour 0.99.71 funciona perfeitamente. o Meu problema é com o xHarbour professional que baixei na xharbour.com. Alguem pode me enviar a versão desta LIB para este xHarbour. Lembro que usao a TWBrowse do Hernam Cecarelli.