Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
25. Feb 2008
Warum? Einfach, Du deklarierst eine Array-Eigenschaft mit Index und die Getter- und Setter-Methoden müssen zu dieser Deklaration kompatibel sein. Ich würde es wie folgend ändern:type
TContainer=class(TSimpleRWSync)
private
function getExpData(i: Integer): String;
public
procedure AddExpData(const Value: String);
property ExpData: String read getExpData;
end;...
Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
25. Feb 2008
Hat keiner was von EXCEPT gesagt ;)procedure TContainer.setExpData(i: Integer; const Value: String);
begin
BeginWrite;
try
SetLength(FExpData, Succ(Length(FExpData)));
FExpData:=Value; <- Warum muss ich einen Index haben?
finally
EndWrite;
end;
end;So als Beispiel ;)