04/03/09 21:12.net
GWindowsを使ってWindowを表示してみました。(Win2000)
GWindows url: URLﾘﾝｸ(www.adapower.com)
--
-- wintest.adb
--
with GWindows.Windows.Main;
with GWindows.Application;
procedure WinTest is
use GWindows.Windows.Main;
Top: GWindows.Windows.Main.Main_Window_Type;
begin
Create (Top, "Hello World");
Size (Top, 300, 100);
visible (Top);
Gwindows.Application.Message_Loop;
end;