Statische Objekte

[alcaeus]

Hi hpf,

ich hoffe dich jetzt richtig verstanden zu haben. Meinst du so etwas:

Delphi-Quellcode:

type
  TDeineKlasse = class(TObject)
    private
      //...
    public
      //...
  end;
  
  TForm1 = class(TForm)
    private
      //...
    public
      DeinObjekt: TDeineKlasse;
  end;

//...

procedure TForm1.FormCreate(Sender: TObject);
begin
  DeinObjekt := TDeineKlasse.Create;
end;

Alle Komponenten können dann auf DeinObjekt zugreifen, und es wird nur einmal im Speicher instanziert. Falls es nicht das Richtige ist, solltest du vielleicht genauer erklären, was du machen willst.

Greetz
alcaeus