Zugriff auf eine Klasseninstanz unitübergeifend

[ozz]

Hallo Leute
ich glaube, daß ich ein Denkfehler im Code habe. Wie greife ich auf von einer Unit auf eine andere Unit zu, wenn ich den Instantznamen der Klasse der ersten Unit nicht kenne?
Ich habe in der ersten Unit eine Variabe vom Typ der Klasse angelegt. Deren Name kenne ich und den referneziere ich. Ist Sinnvoll oder gibt es bessere Lösung? Manchmal sagt ein Code mehr als tausend Worte! :stupid:

Delphi-Quellcode:

unit 1;
implementation  
  uses JobQueueMultiThread;//Main <--- Verweise auf die andere Unit
..
while ((JobQueue.Joblist.Count>0)) do  //<--- JobQueue is nil
...

Delphi-Quellcode:

unit JobQueueMultiThread;//<-- andere Unit
type....
var JobQueue: TJobQueue;// <-- ist nil oben!
implementation

[mkinzler]

Oder besser die Referenzvariablen in eigene Unit auslagern, welche von allen Units dann verwendet wird.

[ozz]

Danke mkinzler für den Tip. Hast du vieleicht noch eine Idee, warum das Teil dann immer nil ist?

[mkinzler]

Bist du sicher, daß eine Instanz erzeugt und dieser Referenzvariable zugewiesen wurde?

[ozz]

Hallo mkinzler,
Danke für deine Hilfe. Irgendwie stehe ich momentan auf den Schlauch. Hast du vielleicht ein Beispiel?

[mkinzler]

Du hast ja nur eine Variable des Typs deklariert, diese ist aber nur eine Referenz(Zeiger). Du mußt eine Instanz der Klasse erzeuge, bevor du mit ihr arbeiten kannst.

Delphi-Quellcode:

JobQueue := TJobQueue.Create( ...);

[ozz]

Hallo mkinzler,
Danke für deine Hilfe. Soweit ist mir dies klar, jedoch weiß ich nicht wo ich diese Zuweisung machen soll. Im Konstruktor von TJobQueue oder in der Procedure, in der ich die Variable des Types verwenden will?
Danke.

[mkinzler]

uf keinem Fall im Konstruktor, er würde sich ja selber aufrufen.
z.B. im Initialisierungsteil der Unit JobQueueMultiThread (wenn nur eine Instanz benötigt wird.
Soll eigene Instanz in Unit 1 verwendet werden dann dort.

[ozz]

Danke mkinzler,
jetzt hat es geklickt. Das mit den initialization muß ich mir nochmal in Ruhe anschauen. Auf jedenfall herzlichen Dank!