Messagedlg с тремя кнопками

[Detka]

Здрасьте всем! Помогите с кодом. Мне надо в Messagedlg выдавать три кнопки с вопросом о сохранении. Ну типа
messagedlg('Сохранить изменения в файле?',mtconfirmation,[mbYes,mbNo,mbCancel],0)
Ну и как заставить правильно работать эти кнопки. Для двух кнопок могу прописать на третью опыта не хватает. помогите кто чем может

[beegl]

CASE MessageDlg('Файл '+ExtractFileName(SaveDialog1.FileName)+' был изменен. Сохранить?', mtConfirmation, mbYesNoCancel, 0) OF
 idYes   :  Save1.onClick(Sender);
 idNo    :;
 idCancel:CanClose:=False;;
end;

[Detka]

это хорошо, потому что я не знаю как правильно прописывается CASE. Но только он не закрывается после нажатия Yes. Как это исправить?

[Alter]

Решение:
Выделяете в Delphi слово MessageDlg, и жмёте F1, и всё там найдёте.

[Detka]

Ну что вы меня все этим F1 тыкаете?! Если б я могла там хоть что-то понять, не спрашивала бы тута!

[DOLBY]

В общем вот что вам нужно:

MessageDlg('Файл '+ExtractFileName(SaveDialog1.FileName)+' был изменен. Сохранить?', mtConfirmation, mbYesNoCancel, 0)

в данном случае появится окно с тремя кнопками. и делайте с этим всё, что захотите.

[Detka]

ЭТО я сделала (не на столько уж я чайник - 2 месяца Делфи изучаю)!
У меня так:
case messagedlg('Сохранить изменения в файле?',mtinformation,[mbYes,mbNo,mbCancel],0)of
idYes:form1.Memo1.Lines.SaveToFile( edit1.Text+'.txt')
idNo:form1.Close;
idCancel:Form1.Show;
end;

Но при этом он закрывает прогу тока после нажатия кнопки Нет. А мне надо, чтоб после Да он тоже форму закрывал.

[eoln]

Замените idYes:form1.Memo1.Lines.SaveToFile( edit1.Text+'.tx t') на

idYes: 
  begin
    form1.Memo1.Lines.SaveToFile(edit1.Text+'.txt');
    form1.Close
  end;

[Detka]

Большое спасибо! Я спинным мозгом понимала, что это должны быть скобки begin...end, тока я не знала куда их правильно поставить.
Но есть надежда, что я не совсем безнадежна )))

Ещё раз спасибо! просто, как всё гениальное!

Тов. программисты! А как мне на OnClose то же самое сделать. Работает все, за исключением кнопки Cancel. После ее нажатия форма все равно закрывается. Как это исправить?