Variablen/Objecte Applicationsweit verfügbar machen

[Hobbycoder]

Etwas so:

Delphi-Quellcode:

unit Unit1;

interface

uses System.Classes, System.Generics.Collections;

type
  TTestObject=class
  private
    Fblabla: string;
    procedure Setblabla(const Value: string);
  published
    property blabla: string read Fblabla write Setblabla;
  end;

  TTestList=class(TObjectList<TTestObject>);

var
  TestListe: TTestList;

implementation

{ TTestObject }

procedure TTestObject.Setblabla(const Value: string);
begin
  Fblabla := Value;
end;

initialization
  TestListe:=TTestList.Create(True);

finalization
  TestListe.Free;

end.

Und das reicht?