Text aus einem Memo umwandeln und in anderem Memo anzeigen

[mcondoi]

Ich habe zwei Memofelder und einen Button erstellt. Wenn ich auf den Button klicke, soll der Text aus dem ersten Feld umgewandelt werden anhand einer Liste, und in das andere Memofeld eingefügt werden. Wie ich den Text in das 2. Memofeld einfüge weiß ich mit
Memo1.Text("Text") und so weiter.

Ich möchte das zum Beispiel aus

>Hallo

AI_Output(self, other) //Hallo

Wenn eine spitze Klammer nach rechts am Anfang steht, dann steht im Umgewandelten "self, other", und wenn die Klammer nach links ist, dann steht die Reihenfolge so: "other, self". Also so:

AI_Output("other, self")//Hallo

Wie geht das nun mit dem Umwandeln, wie realisiere ich das?

[mkinzler]

Du musst den String zerlegen und neu zusammensetzen.

[mcondoi]

Ich bin Anfänger, kannst du das ein wenig erklären, beispiel oder so?

[mkinzler]

z.B. so:

Delphi-Quellcode:

var
  sl := Strings;
...
    sl := TStringList.Create;
    sl.Delimiter := ',';
...
    sl.DelimitedText := Memo.Lines.Strings[<x>];
    Memo.Lines.Strings[<x>] := sl.Strings[1] +','+sl.Strings[0];

Oder per Pos()

[mcondoi]

Wo definiere ich die Zeichen, und durchwekhe sie ersetzt werden?

[mkinzler]

Was willst du ersetzen?

[mcondoi]

Wenn ich in Memo 1

<Hallo

eingebe,
soll in Memo zwei

AI_Output("self, other")//Hallo

erscheinen.

Wenn man allerdings

>Guten Tag

schreibt, soll in Memo 2

AI_Output("other,self")//Guten Tag

erscheinen

[mkinzler]

Ersetzen kannst du per StringReplace(). Aber du benötigst wohl eher einen Parser.