[Delphi] Wstrzymanie zamknięcia programu

W jaki sposób oprogramować formę, aby po kliknięciu przez użytkownika "iksa" zapytała, czy ma się wyłączyć i NIE WYŁĄCZYŁA SIĘ, jeśli uzytkownik nie chce? Piszę różności w "OnClose" i nie działa :(

w OnCloseQuery ustawiasz CanClose
--Szymek

Doświadczenie - jest to coś co zdobywasz tuż po chwili kiedy go potrzebowałeś.

OnCloseQuery

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose:=( Edit1.Text='ble');
end;

Zamknie sie tylko jesli w Edit1 bedzie ble

[szymek byl szybszy...]

Pawel {Delphi 6 Personal}

Po pierwsze: naciśnij F1

pq napisał:
&gt CanClose:=( Edit1.Text='ble');

uu... nie wiedzialem ze takie rzeczy mozna robic w o.pascalu--Vroc
&ltDelphi Knight&gt

Action:=CaNone;

//mozna jescze tak:)