Steward

分享是一種喜悅、更是一種幸福

程式語言 - Free Pascal - Win32 API - Hello, world!

---

main.pp

{$APPTYPE GUI}
{$MODE DELPHI}

program app;

uses
    Windows;

begin
    MessageBox(0, 'Hello, world!', 'main', MB_OK);
end.

編譯、執行

$ WINEPREFIX=~/.wine_x86 box86 wine fpc main.pp
$ WINEPREFIX=~/.wine_x86 box86 wine main.exe

完成