メッセージボックスの使い方

Delphiにはメッセージボックス(TApplication.MessageBox)とメッセージダイアログ(MessageDlg)があります。MessageDlgの３番目の引数は集合型であることに注意してください。

MessageBoxの使い方

// MessageBox
procedure TForm1.Button2Click(Sender: TObject);
const
msg: PChar = 'Hello world.';
title: PChar = 'Hello';
begin
Application.MessageBox(msg, title, MB_OK);
end;

MessageDlgの使い方

// MessageDlg
procedure TForm1.Button1Click(Sender: TObject);
begin
MessageDlg('Hello world', mtInformation, [mbOK], 0);
end;