windows.txt

来自「一个编译器源代码。用法看里面的“使用说明”」· 文本 代码 · 共 11 行

// This doesn't work yet!

Program(Windows,Windows.GUI);
  Uses(Win32);
Stub
  WriteLn('Hello world!');
  Wait;
Begin
  MsgBox(HWND_DESKTOP,'Hello world!','Test',MB_OK);
  User32@ExitProcess(0);
End;