FastReport Zeilenumbruch erzwingen vor bestimmtem Zeichen in Textfeld

[TK8782]

Hallo,

ich habe in einem Report (Fast Report VCL 5) ein Textfeld, in dem eine Emailadresse steht (z.B. [e-mail]).
Nun möchte ich, dass vor dem @-Zeichen automatisch ein Zeilenumbruch im Textfeld erzwungen wird, also die Emailadresse folgendermaßen ausgegeben wird:
max.maier
@mustermann.de

ist das möglich und wenn ja wie?

Vielen Dank.

[EarlyBird]

z.B. im onAfterData

Delphi-Quellcode:

procedure Memo1OnAfterData(Sender: TfrxComponent);
var
 myMemo : TfrxMemoView;
begin
  myMemo := TfrxMemoView(Sender) ;                                              
  insert(#13#10, myMemo.text ,pos('@',  myMemo.text) );
end;

StrechMode des Memos auf smActualHeight einstellen

[philipp.hofmann]

Just for info, weil ich hier #13#10 sehe: In Delphi 10.4 wird mittlerweile der Zeilenumbruch OS-getreu genutzt. D.h. unter Windows ist #13#10 richtig, für alle anderen OS sollte dies aber nur #10 sein. #13#10 hat zumindest unter Android und iOS z.B. in einem TLabel den Effekt des doppelten Zeilenumbruches, warum auch immer.
Daher sollte man hier sLineBreak benutzen.

[himitsu]

Strings.Text ist ein Property, also nicht als "Variable" für Insert oder Delete verwendbar.

PS: StringReplace, ReplaceStr oder modern string.Replace und natürlich
auch die "Funktionen" string.Remove und string.Insert (im Gegensatz zu den "Prozeduren" Delete und Insert)