In einem Modul deklariere ich:
Delphi-Quellcode:
type
TDing = class(TObject)
Nr: integer;
end;
TDingliste = class(TObjectList<TDing>)
...
...
end;
In einem anderen Modul verwende ich das:
Delphi-Quellcode:
procedure Test;
var Dingliste:TDingliste;
procedure Initialisiere;
begin
Dingliste := TDingliste.Create;
end;
procedure HierKnallts;
var Ding:TDing;
begin
Ding := TDing.Create;
Ding.Nr := 1;
Dingliste.add(Ding);
// Access Violation
end;
begin
Initialisiere;
HierKnallts;
end;
Das verstehe ich nicht. Dingliste wird ordnungsgemäß erstellt und ist verfügbar. Nehme ich eine globale Variable für Dingliste, gibt es keine Probleme.