可以使用以下代码在Delphi中显示一个MessageBox对话框,其中包含"确定"和"取消"按钮:

var
  ButtonSelected: Integer;begin
  ButtonSelected := MessageDlg('确定要执行此操作吗?', mtConfirmation, [mbYes, mbNo], 0);
  if ButtonSelected = mrYes then
  begin
    // 点击了"确定"按钮
    // 执行相应的操作
  end
  else
  begin
    // 点击了"取消"按钮或关闭对话框
    // 执行相应的操作
  end;end;