String zerlegen

[marabu]

Hallo Dennis,

Zitat von DenSchub:

Schau dir mal den Schreenshot an

ich hatte das nicht ausreichend getestet, da ich es für völlig problemlos hielt - tut mir leid. So habe ich getestet:

Delphi-Quellcode:

begin
  with VLE.Strings do
  begin
    NameValueSeparator := ':';
    Text := 'user1:password1' + sLineBreak + 'user2:password2';
    ShowMessage(Values['user2']);
  end;
end;

Die Ausgabe ist korrekt. Aufgrund deines ScreenShots habe ich das Problem untersucht und einen ärgerlichen Fehler in der VCL entdecken müssen. In der Methode GetCell() von TValueListEditor wird zur Ermittlung des Values nicht die property NameValueSeparator verwendet, sondern das Literal '='. Das habe ich nicht gewusst. Ich kann auch nicht auf Anhieb erkennen, warum für den internen Zugriff nicht die vorhandenen Methoden von ValueListEditor.Strings verwendet werden, die diesen Fehler ja nicht aufweisen.

Sorry nochmal.