Mit POS Smilys ersetzen, findet aber nur 1. Smily

[Matze]

ne, so:

Delphi-Quellcode:

for i := 0 to RichEdit.Lines.Count.1 do
  for i := 1 to LängederZeile(kA, wie der Befehl ist :angle2:) do
  begin
     //Code
  end;