Nageswarao never included the possibility of having default columns and those suggested by the programmer and those predefined by the end user, I made some changes created by Francisco and created a sub class of xbrowse Is it not a option to set the colums, save the state of xbrowse (selected from ...
Nageswarao never included the possibility of having default columns and those suggested by the programmer and those predefined by the end user, I made some changes created by Francisco and created a sub class of xbrowse Is it not a option to set the colums, save the state of xbrowse (selected from ...
... oBrw SIZE -10,-10 PIXEL OF oDlg ; DATASOURCE oDbf COLUMNS aCols ; AUTOSORT FONT oFont; NOBORDER CELL LINES CLASS TMyBrowse() CLASS TMyBrowse FROM TXBrowse CLASSDATA lRegistered AS LOGICAL DATA aCols2Hide AS ARRAY INIT Array(0) DATA aDefaultCols INIT ARRAY( 0 ) DATA aPreviousCols INIT ARRAY( 0 ...
Hola silvio, Tengo una clase: CLASS TFactur_1 FROM TIMPRIME CLASSDATA lRegistered AS LOGICAL DATA oFont_6 ..... que cuando la compilo da este .ppo: _HB_CLASS TFactur_1 ; function TFactur_1 ( ... ) ; STATIC s_oClass ; LOCAL nScope, oClass, oInstance ; IF s_oClass == NIL .AND. __clsLockDef( @s_oClass ...
Silvio, You can keep the original class and add your own data to it as far as I read this post : https://forums.fivetechsupport.com/viewtopic.php?f=3&t=37281https://forums.fivetechsupport.com/viewtopic.php?f=3&t=37281 I make somethig with Override but I can a...
I need to use a particular xbrowse and have some particular buttons at my foot, this in all the dialogs and I was wondering if I could create an already defined xbrowse without having to copy the same lines every time for each procedure. Furthermore, in the xbrowse columns I need to set many (defaul...
... BASE/1082 Argument error: - Parameter : [ 1] = U [ 2] = N 1 Stack-List ---------- called by MOJCOLTOOLTIP(31) called by (b)TEST(16) called by TXBROWSE:MOUSEMOVE(3554) called by TWINDOW:HANDLEEVENT(0) called by TCONTROL:HANDLEEVENT(1724) called by TXBROWSE:HANDLEEVENT(11734) called by _FWH(3177) ...
... Args: [ 1] = L .T. Stack Calls =========== Called from: => TOLEAUTO:_FREEZEPANES( 0 ) Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:TOEXCEL( 9095 ) the app run on 10 pcs but I get this error only on 2 pcs why? Thanks
... [IN] OBJECT <!object!> => ; __objAddData( <object>, #<Message> ) which is the object ? sample If I must add a data into Txbrowse how I can make ? EXTEND DATA aDefaultCols IN OBJECT TXBrowse give me not found txbrowse
... => ; __objAddData( <Class>():classH, #<Message> ) seem run ok then if I add a data sample : EXTEND DATA aDefaultCols IN CLASS TXBrowse give me an error Error occurred at: 11/13/23, 13:13:45 Error description: Error BASE/3101 Argument error: __OBJADDDATA Stack Calls =========== ...
... but it gave me Error ---- when press Button "add new" it crash Error description: Error BASE/1004 Message not found: TXBROWSE:EDITSOURC Stack Calls =========== Called from: .\source\function\HARBOUR.PRG => _CLSSETERROR( 247 ) Called from: .\XBROWSE.PRG => TXBROWSE:EDITSOURC( ...