Jetzt noch die Parameter richtig anordnen, dann funktioniert es:
Delphi-Quellcode:
type
TPlayer = class(TObject)
private
:
// procedure SetPoints(Value: integer;index: integer); // so nicht
procedure SetPoints (index: integer; value: integer); // besser so
:
end;
// procedure TPlayer.SetPoints( value: integer;index: integer); // so nicht
procedure TPlayer.SetPoints (index: integer; value: integer); // besser so
begin
f_points[index] := value;
end;
Gruß Hawkeye