Posts: 189

Joined: Sun Jul 08, 2007 01:46 AM

Antonio oGet:oBtn:lCancel:=.T. no me funciona
Posted: Fri Oct 03, 2008 10:34 PM

Antonio.

Este código me da error
REDEFINE GET oGet VAR iNfam ID 170 OF iDlg1 FONT xFont1 PICTURE "@!" ;
ACTION (FamiBus(), oGet:SetFocus(), iDlg1:Update()) ;
VALID (Verfami22(iDlg1)) UPDATE
oGet:oBtn:lCancel:=.t.

Da el error
Application
===========
Path and name: C:\Fuentes32\F3CC\F3CC.Exe (32 bits)
Size: 6,487,552 bytes
Time from start: 0 hours 0 mins 3 secs
Error occurred at: 03/10/2008, 19:33:39
Error description: Error BASE/1005 No exported variable: LCANCEL
Args:
[ 1] = U
[ 2] = L .T.

Stack Calls

Called from: => _LCANCEL(0)
Called from: F3cc05.prg => NEW_ITEM(655)...

Alguna sugerencia.

Gracias Maestro.

Ruben Fernandez.
FWH0809

Antonio Linares

Posts: 44162

Joined: Thu Oct 06, 2005 05:47 PM

Antonio oGet:oBtn:lCancel:=.T. no me funciona
Posted: Fri Oct 03, 2008 11:04 PM

Ruben,

Tienes que asignar ese valor desde la claúsula ON INIT del diálogo que es cuando el botón ya se habrá creado:

Code: Select all Collapse

ACTIVATE DIALOG oDlg ;
   ON INIT ( oGet:oBtn:lCancel :=.t. )

regards, saludos

Antonio Linares
www.fivetechsoft.com

Ruben D. Fernandez

Posts: 189

Joined: Sun Jul 08, 2007 01:46 AM

Antonio oGet:oBtn:lCancel:=.T. no me funciona
Posted: Fri Oct 03, 2008 11:27 PM

Gracias Maestro: Funcionó.

En la version 0810 estará arreglado?
(o que y donde cambio para ya tenerlo)

Gracias nuevamente

Ruben Fernandez

Antonio Linares

Posts: 44162

Joined: Thu Oct 06, 2005 05:47 PM

Antonio oGet:oBtn:lCancel:=.T. no me funciona
Posted: Fri Oct 03, 2008 11:36 PM

Ruben,

No hay nada que arreglar :-)

El botón no puede crearse hasta que no existe el handle de su contenedor (el GET) y dicho handle no se crea hasta que no se inicializa el diálogo.

regards, saludos

Antonio Linares
www.fivetechsoft.com

Antonio Linares

Posts: 44162

Joined: Thu Oct 06, 2005 05:47 PM

Antonio oGet:oBtn:lCancel:=.T. no me funciona
Posted: Fri Oct 03, 2008 11:45 PM

Ruben,

Rectifico!

Ya lo habíamos arreglado para facilitar su uso.

Si está arreglado, y estará incluido en la versión 8.10. Hay que añadir esta línea aqui:

Code: Select all Collapse

METHOD CreateButton() CLASS TGet

   ...
      ::oBtn:lCancel = .T. // so the GET VALID is not fired when the button is focused   
   endif   
   
return nil

regards, saludos

Antonio Linares
www.fivetechsoft.com

Ruben D. Fernandez

Posts: 189

Joined: Sun Jul 08, 2007 01:46 AM

Antonio oGet:oBtn:lCancel:=.T. no me funciona
Posted: Fri Oct 03, 2008 11:48 PM

Gracias Maestroooooooooooooooo

Ruben Fernandez.

FiveTech Support Forums

Stack Calls

Continue the discussion