Zitat von
LoL:
Warum kann ich nun die Procedure FreeAndNil(CurrentOL) nicht anwenden?
Fehler: Constant object cannot be passed as var parameter
Dann schau mal die Implementierung von FreeAndNil an. Dort wird der übergebene Parameter auf nil gesetzt.
Und das wird schlecht für eine Funktion gehen.
Zitat von
LoL:
wie kann ich die zurückgegeben komponente freigeben?
CurrentOL.Free
Zitat von
LoL:
Wie kann ich dann mit der zurückgegebenen komponente wieder eine TComponent erstellen
Versteh ich nicht. Die Funktion CurrentOL liefert doch eine TComponent-Instanz zurück?