как сделать чтобы при нажатии на

← →
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;

чтото в этом роде...

В разделе private пишеш :
procedure WMClose(var a:TWMClose); message WM_Close;
А в разделе implementation :
procedure TForm1.WMClose(var a:TWMClose); begin //Споси что дальше делать! //Делай то, что надо! // Обрати внимание следущую строку!!!! A.Result:=0; //------!------ end;

как сделать чтобы при нажатии на Найти похожие ветки