kak zakrit formu esli v forme onclose zapisano

← →
Quiii (2005-01-11 16:54) [0]

Zdrastvujte, podskazhite kto mozet. Ja sdelal progu i tam v onclose u menja zapisana takaja komanda

procedure TfReminder.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action:=caNone;
Hide;
end;

teper" mne nade sdelat" knopku kotoraja budet okon4atel"no zakrivat" fReminder, to est" nado primenit" Action:=caFree.. no sledujushaja problema.. ja neznaju kak eto zapisat" v knopku.. emu vse nenravitsja =( on rugaetsja, govorit ERROR.. ja videmo nepravil"no komandu pishu, podskazhite pozhalujsja 4to ja dolzhna tuda zapisat"

procedure TfReminder.button1Click(Sender: TObject);
begin
....
end;

Zaranee blagodarna

← →
Anatoly Podgoretsky © (2005-01-11 17:06) [1]

Зачем же caNone, если сразу же Hide

← →
Quiii (2005-01-11 17:11) [2]

potomu4to programka svara4ivaetsja v traybar =))

← →
Семен Сорокин © (2005-01-11 17:11) [3]

используйте флаги:

procedure FormClose(Sender: TObject; var Action: TCloseAction); procedure button1Click(Sender: TObject); procedure FormCreate(Sender: TObject); private FHide: boolean; public end; procedure TfReminder.FormCreate(Sender: TObject); begin FHide:= true end; procedure TfReminder.button1Click(Sender: TObject); begin FHide := false; Close end; procedure TfReminder.FormClose(Sender: TObject; var Action: TCloseAction); begin if FHide then Action := caHide else Action := caFree end;

← →
kaZaNoVa © (2005-01-11 17:25) [4]

Halt ExitProcess TerminateProcess ExitThread на выбор

← →
Quiii (2005-01-11 17:26) [5]

=)) SOASIBO VSEM !!! RABOTAET =))))

← →
kaZaNoVa © (2005-01-11 17:30) [6]

Quiii (11.01.05 17:26) [5]
что заюзал?

← →
Quiii (2005-01-11 17:37) [7]

heh.. u menja bil slishkom bol"shoj vibor =)))) zajuzala ideju Semena, tak sama napisala takzhe, tol"ko s oshibkoj =)) ispravila i vse ok =)) Spaibo e6e raz =)

Quiii (11.01.05 17:37) [7]
ты девушка, не знал, извини, если что, обращайся, моя аська 482672

← →
Quiii (2005-01-11 17:41) [10]

Spasibo =)) budu imet" v vidu =)

kak zakrit formu esli v forme onclose zapisano - action:=caNone; Найти похожие ветки