Dynamiczne tworzenie okien

Jak utworzyc dynamicznie okno (nie ShowModal) ktore po zamknieciu usunie sie z pamieci.

Probowalem zrobic cos takiego w watku:

f := TForm.Create(nil);
with f do
begin
  Show;
  while showing do
    Application.ProcessMessages;
  Free;
end;

Ale w rezultacie zawiesilo system (Sleep przed Process... tez nic nie daje)

Watek? lol, daj Free w OnClose ;)

Gdyby to bylo takie proste to nie pisalbym na forum ;-)
Free nie dziala, wyskakuje blad "Access violation...", a nie chce robic przez

try ... except ... end

bo musze miec pewnosc ze okno zostalo usuniete z pamieci

OnClose

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action:=caFree;
end;

Dziekuje, nie wiedzialem ze to moze byc tak proste :-)