FiveTech Support Forums

Saludos,

Tengo problemas al ejecutar un method de una clase propia desde botones Ejemplos:

  REDEFINE BTNBMP oBtn2 ID 111 OF oDlg ;
  PROMPT "Sincronizar" RESOURCE "REPORT" 2007 RIGHT ;
  ACTION ::SincroSorteos(cCodLot,oBrw4,oBtn3)
                          ---Este codigo me genera el siguiente error:

Error description: Error BASE/1004 Message not found: TBTNBMP:SINCROSORTEOS
Args:
[ 1] = O TBTNBMP

Ahora si corro el mismo metodo pero desde un REDEFINE BUTTONBMP

REDEFINE BUTTONBMP oBtn3 ID 112 OF oDlg ACTION ::SincroSorteos(cCodLot,oBrw4,oBtn3) ;
BITMAP ".\bmp\32x32\undo.bmp" PROMPT space(05)+"Sinc&ronizar" TEXTRIGHT

Me funciona correctamente

Ahora el problema, es que ahora me genera un similar problema esta instrucción.

ADD BUTTON oQbtn2 QUICKACCESS oQck BITMAP ".\bmp\16x16\toggle.bmp" ;
ACTION ::Login(2)

Error description: Error BASE/1004 Message not found: TRBTN:LOGIN
Args:
[ 1] = O TRBTN

Igualmente no puedo ejecutar un metodo propio de una clase propia , si corro una funcion, si me deja
o cualquier otro Action como por ejemplo un MsgStop(), etc...
el problema se genera solo para metodos propios.

Espero me puedan entender y ayudar, saludos cordiales.

mag071

cuando llamas a una accion desde un boton, delde el CH se le pasa como parametro Self [{|Self|<uAction>}], en este caso con la buttonbmp no sucede asi, por tl motivo no te genera ese error

recuerda que el Self es "::"
como haces ACTION ::SincroSorteos(cCodLot,oBrw4,oBtn3), en este caso como se recive el self (el botton mismo) como parametro intentara buscar el methodo SincroSorteos dentro de la btnbmp, para solventarlo, crea una variable local oSelf y le asignas el self de tu clase

local oSelf := Self

y cuando llames en la accion lo haces de esta manera ACTION oSelf:SincroSorteos(cCodLot,oBrw4,oBtn3)

Muy Agradecido,

Ahora funciona correctamente.
Muy rapida respuesta.

Saludos.-