6 lines
169 B
ObjectPascal
6 lines
169 B
ObjectPascal
function MessageBox(h:integer;m,c:string;t:integer):integer;
|
|
external 'User32.dll' name 'MessageBox';
|
|
|
|
begin
|
|
MessageBox(0,'Привет!','Сообщение',0);
|
|
end. |