初学者的消息框的问题！！！

Question

我想产生一个消息框MessageBox，让它有两个选择按钮，一个是继续，另一个是退出。如何写啊？？？还有怎么判断选了继续按钮还是退出按钮啊？？？多谢各位了！

Answer 1

if MessageBox(0,'你确定要退出程序吗？','友情提示',MB_YESNO)=IDYES then Close;

Answer 2

还有一个附加问题，比如，我的一个form里，有10个edit框，我想让
edit1.text:='';
.....
edit10.text:='';能不能不这么写十遍啊？有什么可以用的方法什么的么？
多谢多谢

Answer 3

for i:=0 to ComponentCount-1 do
begin
  if (Components[i] is TEdit) then
    (Components[i] as TEdit).Text:='';
end;