Folgendes Problem.
Ich möchte gerne
BBCode aus Memo1 ersetzen und in Memo2 schreiben lassen:
Delphi-Quellcode:
procedure TForm1.Check(sMemo: TMemo);
var
nMemo: String;
begin
nMemo := sMemo.Lines.Text;
Memo2.Lines.Text :=
StringReplace(nMemo, '[color=', '<font color=#',
[rfReplaceAll, rfIgnoreCase]);
Memo2.Lines.Text :=
StringReplace(nMemo, '[b]', '[b]', [rfReplaceAll]);
Memo2.Lines.Text :=
StringReplace(nMemo, '[/b]', '[/b]', [rfReplaceAll]); // HIER
LoadHTMLToWebbrowser(WebBrowser1, SynMemo2.Lines);
end;
Aber irgentwie will nur das in der markierten Zeile funktionieren, das drüber und drunter geht nicht