Höchstwahrscheinlich operierst du auf einem Nil-Objekt rum.
Das Problem ist nicht, dass
priv_Calls = Nil sein könnte sondern dass self = Nil ist.
Delphi-Quellcode:
function TTapiLine.CallCount: integer;
begin
// diese Sicherheitsabfrage schlägt Alarm bevor Schlimmeres passiert
// Assertions müssen in den Projektoptionen natürlich zugelassen sein
Assert(Assigned(self));
Result:=0;
try
Result:=Length(priv_Calls);
except on e:
Exception do
showmessage(e.
message);
end;
end;