Eventos en FiveTouch

Eventos en FiveTouch

Postby Antonio Linares » Sat Apr 15, 2017 7:15 am

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 view
#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 CENTERED

return nil
 


Image

Image
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41205
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Return to FiveTouch

Who is online

Users browsing this forum: No registered users and 3 guests