Sprawdzanie TFrame

Witam.
Mam drobne pytanko, ale na początek kod:

procedure TfrmMain.sbtnAdresaciClick(Sender: TObject);
begin
if sbtnAdresaci.Down then
begin
  Ramka := TfrmAdresaci.Create(frmMain);
  Ramka.Parent := frmMain;
  Ramka.Top := 0;
  Ramka.Left := 180;
  Dane.Baza.Connected := True;
  Dane.dsetAdresaci.Active := True;
end else
begin
  Dane.dsetAdresaci.Active := False;
  Ramka.Free;
end;

end;

Zmienna Ramka jest typu TFrame. I teraz wspomniane pytanie: w jaki sposób sprawdzić, czy ta zmienna przechowuje aktualnie jakiś TFrame?? Chodzi mi o taką sytuację, że będzie kilka przycisków i chcę wykonać przełączanie tymi przyciskami odpowiednich formularzy.

Kiedy nie przechowujesz ramki, to po jej zwolnieniu (Ramka.Free), ustaw wartość zmiennej na nil. Potem tylko testujesz, czy Ramka <> nil i masz odpowiedź.

Dzięki za podpowiedź.