- Code: Select all Expand view RUN
- #include "FiveTouch.ch"
function Main()
MsgInfo( "Hello world from FiveTouch" )
return nil
#include "FiveTouch.ch"
function Main()
MsgInfo( "Hello world from FiveTouch" )
return nil
#include "FiveTouch.ch"
function Main()
local oDlg, oSay, oBtn1, oBtn2
DEFINE DIALOG oDlg ;
SIZE ScreenWidth(), ScreenHeight()
@ 100, 100 SAY oSay PROMPT "My Android app" OF oDlg
@ 200, 200 BUTTON oBtn1 PROMPT "Stock" OF oDlg SIZE 200, 200 ;
ACTION MsgInfo( "Stock" )
@ 450, 200 BUTTON oBtn2 PROMPT "Clients" OF oDlg SIZE 200, 200 ;
ACTION MsgInfo( "Clients" )
ACTIVATE DIALOG oDlg CENTERED
return nil
#include "FiveTouch.ch"
function Main()
local oDlg, oSay, oBtn1, oBtn2
DEFINE DIALOG oDlg ;
SIZE ScreenWidth(), ScreenHeight()
@ 100, 100 SAY oSay PROMPT "My Android app" OF oDlg
@ 200, 200 BUTTON oBtn1 PROMPT "Stock" OF oDlg SIZE 200, 200 ;
ACTION MsgInfo( "Stock" )
oBtn1:SetIcon( QIcon( QPixmap( "test.jpg" ) ) )
oBtn1:SetIconSize( QSize( 150, 150 ) )
@ 450, 200 BUTTON oBtn2 PROMPT "Clients" OF oDlg SIZE 200, 200 ;
ACTION MsgInfo( "Clients" )
ACTIVATE DIALOG oDlg CENTERED
return nil
Users browsing this forum: No registered users and 0 guests