Nije bas pametno da se koristi Free metod u event-ima objekta koji ce se obrisati iz memorije (tako kazu u Delphi Help-u). Bas zbog toga je dodata mogucnost da se izabere akcija koja ce se izvrsiti kada se forma zatvori (pozivom Close funkcije, klikom na x u gornjem desnom cosku, duplim klikom na system menu,...). Posto zelis da se tvoja forma izbrise iz memorije onda bi to izgledalo ovako:
Code:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
end;
Vrednosti koje Action moze imati:
caNone - nista se ne desava kada korisnik hoce da zatvori formu
caHide - Visible postaje False kada korisnik hoce da zatvori formu
caFree - forma se brise iz memorije kada korisnik hoce da zatvori formu
caMinimize - forma se minimizira kada korisnik hoce da zatvori formu