Einzelnen Beitrag anzeigen

Hobbycoder

Registriert seit: 22. Feb 2017
955 Beiträge
 
#1

Variablen/Objecte Applicationsweit verfügbar machen

  Alt 24. Apr 2017, 19:47
Hi,

wenn ich z.B. eine ObjectList in der Main erzeuge, auf diese aber auch von weiteren Formen zugreifen will (z.B. zum Füllen einer Combobox), dann muss ich die immer an/durch alles Units durchreichen.
Zur Zeit mache ich das so:
UnitMain:
Delphi-Quellcode:
private
  TestListe: TTestListe;

Procedure Create;
  TestListe:=TTestListe.create;

procedure Destroy;
  TestListe.Free;
Unit A:
Delphi-Quellcode:
public
  TestListe: TTestListe;
und irgendwo im Code setzte ich dann UnitA.Testliste=Main.Testliste.

Sieht jetzt beschissen aus, aber ihr wisst was ich meine. Wenn ich jetzt in UnitA irgendwas mit der TestListe mache, ist das halt die aus der MainUnit.

Wie kann ich das besser machen, so dass die TestListe auf der Mainunit in allen anderen Units zur Verfügung steht, ohne dass ich sie hier so durchreiche und ohne dass ich in UnitA die UnitMain in die Uses aufnehmen müsste (will ich nämlich nicht).
Gruß Hobbycoder
Alle sagten: "Das geht nicht.". Dann kam einer, der wusste das nicht, und hat's einfach gemacht.
  Mit Zitat antworten Zitat