Erstellte Form onClose zu weisen ???

[Piro]

habe habe jetz mit "caFree" herumprobiert. Ich schaffe es nicht. Es wäre nett wenn mir einer mal ein Beispiel geben kann. Wäre nett.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
 Form: TForm;
begin
 Form:=TForm.Create(Self);
 with Form do
 begin
   Left:=100;
   Top:=100;
   OnClose:=CloseForm(caFree);
   ShowModal;
 end;
end;

procedure TForm1.CloseForm(Sender: TObject);
begin
 ShowMessage('Die neue Form wird geschlossen.');
end;

Gruß, Sven