Ich fasse das mal als Aufforderung auf, Christian:
Delphi-Quellcode:
function TStrings.GetValueFromIndex(Index: Integer): string;
begin
if Index >= 0 then
Result := Copy(Get(Index), Length(Names[Index]) + 2, MaxInt) else
Result := '';
end;
zusammen mit dem Wissen, dass
Self.Names[ ] immer leer ist, wenn kein Trenner (in D7 variabel mit
TStrings.NameValueSeparator und default "=") findet, wird deutlich, dass
Copy(ARandomString, 0+2, MaxInt)
immer die beiden ersten beiden Zeichen "entfernt".