Eventos en FiveTouch

Post Reply
User avatar
Antonio Linares
Site Admin
Posts: 42716
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Has thanked: 93 times
Been thanked: 103 times
Contact:

Eventos en FiveTouch

Post by Antonio Linares »

Como FiveTouch usa Harbour QT library, simplemente tienes que hacer:

oControl:Connect( nEvent, { | uParam | MsgInfo( uParam ) } )

en donde nEvents es uno de estos valores:
http://doc.qt.io/qt-4.8/qevent.html

Ejemplo:

Code: Select all | Expand

#include "FiveTouch.ch"function Main()   local oDlg, oBtnOk, oBtnCancel   DEFINE DIALOG oDlg   oDlg:Connect( 2, { || MsgInfo( "click" ) } )      @ 200, 90 BUTTON oBtnOk PROMPT "Ok" OF oDlg ;      ACTION MsgInfo( "Ok!" )   @ 200, 220 BUTTON oBtnCancel PROMPT "Cancel" OF oDlg ;      ACTION oDlg:End()   ACTIVATE DIALOG oDlg CENTEREDreturn nil 


Image

Image
regards, saludos

Antonio Linares
www.fivetechsoft.com
Post Reply