Code: Select all
#include "FiveWin.ch"
function Main()
local oWnd, cTest := "Hello world!"
DEFINE WINDOW oWnd COLOR "N/W"
@ 2, 2 GET cTest SIZE 100, 20 ACTION MsgInfo( "click" )
ACTIVATE WINDOW oWnd
return nil
Code: Select all
#include "FiveWin.ch"
function Main()
local oWnd, cTest := "Hello world!"
DEFINE WINDOW oWnd COLOR "N/W"
@ 2, 2 GET cTest SIZE 100, 20 ACTION MsgInfo( "click" )
ACTIVATE WINDOW oWnd
return nil
Code: Select all
#ifdef __FLAT__
1 24 "WindowsXP.Manifest"
#endif