function DeleteControl( oPanel, nItem ) local nTop, nLeft for n := Len( oPanel:aControls ) to nItem + 1 STEP -1 oPanel:aControls[ n ]:nTop := oPanel:aControls[ n - 1 ]:nTop oPanel:aControls[ n ]:nLeft:= oPanel:aControls[ ...
Nages oPanel:aControls[ nItem ]:End() HB_ADel( oPanel:aControls[ nItem ], nItem, .t. ) ASize( oPanel:aControls, Len( oPanel:aControls ) ) oPanel:SetRange() oPanel:refresh() I saw on oPanel:aControls there are also the records https://i.postimg.cc/QNKWmS1C/mm.png ...
... Erase_Items(oBrw,oPanel) local nItem:= oBrw:aArrayData[ oBrw:nArrayAt ][2] aDel(oBrw:aArraydata,nItem-1) // xbrowser oBrw:aArraydata oPanel:aControls[nItem]:destroy() oBrw:refresh() oPanel:refresh() return nil Function Manage_Items(aData,oBrowse) local oDlg local oBar local ...
... application in the window method ::handleEvent() describing the processing of a unique event. For example: if valtype(nMsg)="C" oDlg:AControls[1]:SetText(msg) return endif ::Super... From the application with the button we find the handle of the window with TSAY hWn:=FindWindow() ...
... cambiar los controles que tiene, cómo lo harías ? Intenta eso y seguimos viendo lo que necesitas Recuerda que todo contenedor tiene un array ::aControls, en el que están todos los objetos que has definido dentro, por lo tanto AEVal( oContenedor:aControls, { | o | o:End() ...
When we create controls on a Window, all controls are fully created and so have valid hWnd. When we create controls on a dialog, the controls are created only when the dialog is initialized. So, hWnd is valid only after activating the dialog.
hi, i do have REDEFINE BUTTON and i want to get hWnd of each Control FOR ii := 1 TO LEN( ::aControls ) oObj := ::aControls[ii] hWnd := oObj:hWnd fwlog oObj, LEN(oObj), hWnd oOBj -> TBUTTON LEN(oObj) -> 151 // ??? hWnd -> ...
... oPanel:nTop := oRect:ntop +40 oPanel:nLeft := oRect:nleft+5 oPanel:nBottom := oRect:nBottom-45 oBar:refresh() for n=1 to Len(oPanel:aControls) oPanel:aControls[n]:refresh() next RETURN NIL > all the test sources #include "FiveWin.ch"#include "constant.ch"#define ...