DelphiのMessageboxダイアログボックスには、「確認」「キャンセル」が表示されます。

Delphiで「OK」ボタンと「キャンセル」ボンを含むメッセージボックスを表示するには、以下のコードを使用できます。

var

ButtonSelected: Integer; begin

ButtonSelected := MessageDlg(‘确定要执行此操作吗？’, mtConfirmation, [mbYes, mbNo], 0);

if ButtonSelected = mrYes then

begin

// 点击了”确定”按钮

// 执行相应的操作

end

else

begin

// 点击了”取消”按钮或关闭对话框

// 执行相应的操作

end; end;

このコードは、”実行してもよろしいですか？”というタイトルのダイアログボックスを表示し、”はい”と”キャンセル”の2つのボタンが含まれています。ユーザーがどのボタンを選択するかに応じて、コードは対応する操作を実行します。ユーザーが”はい”ボタンをクリックした場合、ButtonSelectedの値はmrYesになります。ユーザーが”キャンセル”ボタンをクリックしたり、ダイアログボックスを閉じた場合、ButtonSelectedの値はmrNoになります。