#DEFINE STD_OUTPUT_HANDLE -11
DECLARE INTEGER AllocConsole IN kernel32
DECLARE INTEGER GetConsoleWindow IN kernel32
DECLARE INTEGER GetStdHandle IN kernel32 LONG nStdHandle
DECLARE INTEGER ShowWindow IN user32 AS ShowWindowA;
INTEGER hWindow, INTEGER nCmdShow
DECLARE INTEGER WriteConsole IN kernel32;
INTEGER hConsoleOutput, STRING @lpBuffer,;
INTEGER nCharsToWrite, INTEGER lpCharsWritten,;
INTEGER lpReserved
= AllocConsole()
= ShowWindowA(GetConsoleWindow(), 1)
= WriteConsole(GetStdHandle(STD_OUTPUT_HANDLE), "Hello World!", 12,0,0)
|
The original hello-world program in the Windows 1.0 SDK was a bit of a scandal. HELLO.C was about 150 lines long, and the HELLO.RC resource script had another 20 or so more lines. (...) Veteran C programmers often curled up in horror or laughter when encountering the Windows hello-world program.
— Charles Petzold, Programming Microsoft Windows with C#
* * *
What could be easier of that?? "Hello World!"
or this
DEFINE WINDOW helloworld FROM 10,10 TO 20,50 SYSTEM CLOSE
ACTIVATE WINDOW helloworld
? "Hello World!"
* * *
Find more than 20 different ways of saying Hello World on FoxPro Wiki.
Read about Hello World program in Wikipedia. |
Terminating all running applications from a VFP program 
