FiveTech Software tech support forums

... ; bla ; OF oFold:aDialogs[7] bla ; bla ; bla ; lbKrdOpr:nClrPane := { || IIF( DETKDX->KCLR == 0, CLR_A, CLR_B ) } <--- Aqui Static Function XXXXXXX() // para "llenar" la base o arreglo LOCAL nQ, nClrFlg := 0 FOR nQ := aKrdDts[4] TO aKrdDts[5] IF MOVSYS->( DbSeek( DtoS( nQ ) ) ) WHILE ...

te falta especificar el nombre de la variable:

local cValue := Space( 20 )

...

REDEFINE GET cValue ID 210 OF oFld:aDialogs[ 1 ] PICTURE "XXXXXXX"

te falta especificar el nombre de la variable:

local cValue := Space( 20 )

...

REDEFINE GET cValue ID 210 OF oFld:aDialogs[ 1 ] PICTURE "XXXXXXX"

... REDEFINE FOLDER oFld ID 800 OF oDlg; PROMPTS "General", "Detalles" ; DIALOGS "sub1", "sub2" REDEFINE GET ID 210 OF oFld:aDialogs[ 1 ] PICTURE "XXXXXXX" ACTIVATE DIALOG oDlg ; ON INIT oFld:InitDialogs() RETURN 0 ************************************************************* EL PROBLEMA QUE TENGO ...

... REDEFINE FOLDER oFld ID 800 OF oDlg; PROMPTS "General", "Detalles" ; DIALOGS "sub1", "sub2" REDEFINE GET ID 210 OF oFld:aDialogs[ 1 ] PICTURE "XXXXXXX" ACTIVATE DIALOG oDlg ; ON INIT oFld:InitDialogs() RETURN 0 ************************************************************* EL PROBLEMA QUE TENGO ...

... ) Next nI Else Tone( 1000, 1 ) MsgStop( "No any Network Card!!" ) EndIf Return NIL if GetNetCardID() <> 'XXXXXXX' MsgInfo('This Computer is not licensed') endif This is useful only when the user has an eithernet card in his P.C and to control multi-user ...

Hi betoncu if GetNetCardID() <> 'XXXXXXX' MsgInfo('This Computer is not licensed') endif This is useful only when the user has an eithernet card in his P.C and to control multi-user applications. It may not be useful for stand alone applications. ...

... agregar un campo timestamp "dummy" a las tablas. Esto no lo he tratado aun. Mi string de conexion es: DRIVER={MySQL}; SERVER=localhost; DATABASE=XXXXXXX; UID=jllinas; PWD=XXXXXXXX; OPTION=16387 AL momento de conectar, el CursorLocation es adUseClient. Para crear el recordset hago: ::oRs := CreateObject("ADODB.Recordset") ...

... agregar un campo timestamp "dummy" a las tablas. Esto no lo he tratado aun. Mi string de conexion es: DRIVER={MySQL}; SERVER=localhost; DATABASE=XXXXXXX; UID=jllinas; PWD=XXXXXXXX; OPTION=16387 AL momento de conectar, el CursorLocation es adUseClient. Para crear el recordset hago: ::oRs := CreateObject("ADODB.Recordset") ...

Amigos del foro... estoy utilizando el makefile brmake, los prg ya los modifique poniendo al comienzo el Func MyPrg(), los compila correctamente, pero cuando tiene que linkear los obj me tira el error que les puse en el subject. Lo voy a ampliar: *** Error: Unresolved External 'HB_FUN_GUINIOON' refe...