Objektlisten

[Bernhard Geyer]

Sollte mit folgenden Änderungen gehen:

Delphi-Quellcode:

  ...
  property NPCS[Index: Integer]:      TNPC read GetNPCS; 
...
function GetNPCS(Index: Integer): TNPC;
begin
  result := FNPCS[Index] as TNPC
end;