FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Diferencias Internas en btnbmp y button
Posts: 297
Joined: Fri Apr 14, 2006 05:52 PM
Diferencias Internas en btnbmp y button
Posted: Sun Sep 09, 2007 11:28 AM
Buenos dias foro!!, ¿Sabeis a que es debido que hayas diferencias entre el action del btnbmp y del button, es decir:

redefine button oBton3 id 303 of odlg action if(::lInsertMode,o:Append(),o:Update())


esta definicion del boton pregunta si una variable de instancia tiene un valor apara llamar al metodo de añadir o actualizar de otra clase. Aqui funciona correctamente.


redefine btnbmp oBton3 resource "BTON_ACEPTAR" id 303 of odlg action if(::lInsertMode,o:Append(),o:Update())


esta deficion es la misma pero usando btnbmp, pues me salta un error diciendo que TBTNBMP no tiene el data lInsertMode, es como si pensará que ::lInsertMode, pertenece a la clase TBTNBMP.

¿A que puede ser debido?.

Estoy investigando, pero dejo caer la pregunta el foro, MUCHAS GRACIAS DE ANTEMANO.
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Diferencias Internas en btnbmp y button
Posted: Sun Sep 09, 2007 11:42 AM
Mike,

La diferencia es debida a que al evaluar la acción del TBtnBmp se le está pasando "Self" (una referencia al propio botón).

Puedes solucionarlo así:
local oThis := Self

redefine btnbmp oBton3 resource "BTON_ACEPTAR" id 303 of odlg action if(oThis:lInsertMode,o:Append(),o:Update())
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 297
Joined: Fri Apr 14, 2006 05:52 PM
Diferencias Internas en btnbmp y button
Posted: Sun Sep 09, 2007 01:59 PM

Entendido: OK
Funcionando: OK

Muchas Gracias por todo y por contestar tan rápido :D

Continue the discussion