Форум: "Основная";
Текущий архив: 2003.09.01;
Скачать: [xml.tar.bz2];
Внизкак сделать чтобы при нажатии на Найти похожие ветки
← →
MakNik (2003-08-18 11:48) [0]Подскажите, плз., как сделать чтобы при нажатии на "х" приложение не закрывалось а спрашивало что делать?
← →
Григорий Ситнин (2003-08-18 11:50) [1]OnCloseQuery
← →
KILLER_ABV (2003-08-18 11:54) [2]if messagedlg("Покинуть программу?",mtWarning,[mbYes,mbNo],0)=mrYes then CanClose:=false;
чтото в этом роде...
← →
ZioN (2003-08-18 15:10) [3]В разделе private пишеш :
procedure WMClose(var a:TWMClose); message WM_Close;
А в разделе implementation :
procedure TForm1.WMClose(var a:TWMClose);
begin
//Споси что дальше делать!
//Делай то, что надо!
// Обрати внимание следущую строку!!!!
A.Result:=0; //------!------
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.09.01;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.009 c