Delphi-Quellcode:
sCommand := edtCommand.Text;
if not Length(sCommand) > 0 then
exit;
AStringList := TStringList.Create;
if not Assigned(AStringList) then
exit;
AStringList.Delimiter := ':';
AStringList.Text := sCommand;
lblShowListElement.Caption := AStringList[0];
lblDelimitedText.Caption := AStringList.DelimitedText;
lblDelimiter.Caption := AStringList.Delimiter;
AStringList.Free;
Diese Lösung habe ich jetzt implementiert und getestet, führt aber nicht zu dem gewünschtem Ergebnis.
Soweit ich die in der Hilfe angebotene Beschreibeung zu TStringList verstanden habe,
beschreibt Delimiter ein Zeichen, welches genutzt wird, um
Text, der aus zusammen gesetzten TStrings besteht, mit Hilfe dieses Delimiters zu "einem" String zu formen.
Meine Aussage bzw. der Tatbestand meiner Ausführungen im obigen Beitrag scheinen mit diesem Beitrag widersprüchlich zu sein,
da dort der
Text "einer" StringListe, dem
Text einer "anderen" StringListe zugewiesen wird und das Arbeiten
mit dieser "anderen" StringListe einwandfrei funktioniert, sprich Zugriffe dieser Art
AStringList[0] auch funktionieren.
Gruß inriz