Sonderzeichen verarbeiten mit StringList

[Bummi]

kann es sein dass Du etwas in der Art suchst?

Delphi-Quellcode:

procedure TForm2.Button1Click(Sender: TObject);
var
  ts, fields: TStringList;
  i,j:Integer;
begin

  ts := TStringList.Create;
  fields := TStringList.Create;
  try
    ts.Text := Clipboard.AsText;
    fields.Delimiter := ',';
    fields.StrictDelimiter := true;
    for I := 0 to ts.Count - 1 do
        begin
          fields.DelimitedText := ts [i];
          for j := 0 to fields.Count - 1 do
             TuetwasMitFeld(fields[j]);
        end;
  finally
    ts.Free;
    fields.Free;
  end;
end;