{$APPTYPE GUI}
{$MODE DELPHI}
program hello;

uses
    Windows;

begin
    MessageBox( 0, 'Hello, Win32 API(Pascal) World!', 'Hello, World!', MB_OK );
end.