Programmstart dauert lange

[Sir Rufo]

Zitat von Drumbo:

1. Geh ich richtig in der Annahme, dass ich immer erst überprüfen muss ob die Unit bereits erzeugt wurde?
2. Wie mach ich das?

1. Falsch, eine UNIT wird eingebunden aber nicht erzeugt. In der Unt befinden sich Klassenbeschreibungen aus denen man dann Instanzen erzeugen kann.
2. s.o. gar nicht -

Ja und diese globalen Variablen sind einfach ein Kreuz, womit man (meistens Anfänger auf dem Weg zum Fortgeschrittenen) immer wieder gerne auf die Nase fällt, weil jetzt erkannt wird, dass man von einer Klasse mehrere Instanzen erzeugen kann - aber es funktioniert nicht so richtig.

Delphi-Quellcode:

TForm1 = class( TForm )
procedure Foo;
procedure Bar;
end;

var
  Form1 : TForm1;

implementation

procedure TForm1.Foo;
begin
  Form1.Bar; // <- das wird jetzt lustig, von Zugriffsfehlern bis zum es funktioniert gar nichts oder an der falschen Stelle ist alles dabei

  // DARUM

  Self.Bar; // wir meinen DIESE Instanz

  // ODER EINFACH NUR

  Bar;
end;

Sehr beliebt ist auch, diese globalen Variablen beim Free der Instanz nicht auf nil zu setzen. Ein Prüfen (Instanz da oder nicht) ist dann nicht mehr möglich!