Форум: "Основная";
Текущий архив: 2004.03.03;
Скачать: [xml.tar.bz2];
Вниз
Как вернуться в прошлое? Найти похожие ветки
← →
Гиричев Руслан (2004-02-21 18:09) [0]Здравствуйте!
После CloseQuery у меня идёт запрос на сохранение, вопрос в том, как закрыть это окно и вернуться в программу?
Заранее спасибо, причём очень ОГРОМНОЕ!!!
← →
TUser (2004-02-21 18:12) [1]hide. А как вернуться в прогу, если ты оттуда не уходил - не знаю *)
← →
YurikGl (2004-02-21 18:20) [2]Посмотри CanClose
← →
Юрий Зотов (2004-02-21 19:08) [3]> Гиричев Руслан
Надо не ПОСЛЕ CloseQuery, а в САМОМ CloseQuery.
if DataNotSaved and (MessageBox(...) = ID_YES) then
begin
... // Сохранение данных
end;
← →
Max003 (2004-02-21 19:44) [4]По теории Инштейна для того, чтобы вернуться в прошлое необходимо развить скорость близкую или даже большую, нежели скорость света.
← →
Гиричев Руслан (2004-02-21 22:20) [5]Спасибо, сейчас посмоРЮ
← →
Гиричев Руслан (2004-02-21 22:37) [6]Нет, всё же вопрос не правильный :-)
Вы уж извините, но как закрыть то окно, и продолжать работать в проге. Кагда на кнопку пишешь Close;, зависает...
> Юрий Зотов
Извините, но у меня должна открываться моя форма, а не стандартная...
← →
Гиричев Руслан (2004-02-21 22:38) [7]извините, там не Close, а hide...
когда close - выходит из проги
← →
Юрий Зотов (2004-02-21 23:01) [8]> Гиричев Руслан © (21.02.04 22:37) [6]
> Извините, но у меня должна открываться моя форма, а не
> стандартная...
А что, это неразрешимая проблема?
if DataNotSaved then
with TMySaveDataForm.Create(nil) do
try
ShowModal
finally
Free
end;
← →
Гиричев Руслан (2004-02-22 00:11) [9]Увы, никак нет!
← →
Palladin (2004-02-22 00:15) [10]увы никак нет что?
← →
Maxud (2004-02-22 01:45) [11]Наверное вопрос в этом:
procedure TfmMain.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose := MessageBox(Handle, "Вы хотите закрыть программу?",
Завершение работы", MB_YESNOCANCEL + MB_ICONQUESTION)=ID_YES;
end;
← →
Alex Konshin (2004-02-22 04:11) [12]Следующий вопрос будет о том, почему его программа не закрывается при шатдауне Windows и даже подвешивает их при этом.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.03.03;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.009 c
