TSaveDialog

[Fisherman86]

Как определить какя кнопка была нажата?
сохранить. или отмена?

[Пепел Феникса]

if SD.Execute then //нажата сохранить
else //иначе отмена

[Fisherman86]

Вы наверно не правильно поняли вопрос!
Надо что-бы программа не закрылась до того пока файл небыл сохранен

[Stilet]

Вы наверно не правильно поняли вопрос!

Это ты неправильно (обрати внимание - пишется слитно) вопрос поставил )

Надо что-бы программа не закрылась до того пока файл небыл сохранен

А это уже не зависит от этого компонента. Он не умеет сохранять.
Если в твоей программе прописано сохранение скажем в потоке, значит нужно ждать пока сохранение отработает, но к твоей теме это не относится.

[Fisherman86]

Уважаемый "Stilet" не раздельно пишется с глаголами!

(освежи память)

А по вопросу мне нужно определить какая кнопка была нажата в уже открытом диалоге.

[BDA]

...
notsaved: Boolean;
...
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  if notsaved and SaveDialog1.execute then
  begin
    Memo1.lines.SaveToFile(SaveDialog1.FileName);
    notsaved := false;
  end;
  CanClose := not notsaved;
end;

procedure TForm1.Memo1Change(Sender: TObject);
begin
  notsaved := true;
end;

Вот такой вариант.
Но для более точных советов опишите более полно, что вы хотите получить, а то вдруг получится так.

[Stilet]

не раздельно пишется с глаголами!

Умник, да?
Молодец. Будешь шпионов государства запутывать. Дезинформировать. Тоже полезная профессия.

[Fisherman86]

"Stilet" зачем человеку указывать на его ошибки?
Это уже некорректно.
Может учителя такие.
Тем более "Microsoft Office 2010" не против.

[Fisherman86]

"BDA" Спасибо интересный вариант!

[Stilet]

Это уже некорректно.

Давай-ка твой вопрос вспомним:

Как определить какя кнопка была нажата?
сохранить. или отмена?

А теперь правильный ответ:

if SD.Execute then //нажата сохранить
else //иначе отмена

И твоя реплика:

Вы наверно не правильно поняли вопрос!

И кто ты после этого?
Тот кто не хочет услышать, говорить не умеет. Запомни это.