pascalabcnet/InstallerSamples/Other/UnmanagedGraphics/MessageBox.pas

function MessageBox(h:integer;m,c:string;t:integer):integer;
external 'User32.dll' name 'MessageBox';

begin
  MessageBox(0,'Привет!','Сообщение',0);
end.
initial commit 2015-05-14 22:35:07 +03:00			`function MessageBox(h:integer;m,c:string;t:integer):integer;`
			`external 'User32.dll' name 'MessageBox';`

			`begin`
change encoding for all .pas and .cs files: cp1251 -> utf-8 2015-12-28 14:25:15 +03:00			`MessageBox(0,'Привет!','Сообщение',0);`
initial commit 2015-05-14 22:35:07 +03:00			`end.`