Hallo Zusammen,
ich verzweifele hier noch.
Ich habe eine Datei mit Text, die ich über eine WideStringlist reinlade.
Nun habe ich ein MemoText(
Unicode), den ich mittels WideStringReplace ersetzten will.
Also
so:
Delphi-Quellcode:
if FileExists(IncludeTrailingBackslash(StartPath) + 'PKMailErsetzung\MailErsetzung_' + PKUser + '.mail') then
begin
xErsetzung := TStringList.Create;
xErsetzung.LoadFromFile(IncludeTrailingBackslash(StartPath)
+ 'PKMailErsetzung\MailErsetzung_' + PKUser + '.mail');
if xErsetzung.Text <> '' then
begin
body.Text := WideStringReplace(body.Text, xErsetzung.Text, '', [rfReplaceAll, rfIgnoreCase]);
showmessage(xErsetzung.Text);
showmessage(body.Text);
end;
xErsetzung.Free;
end;
Das funktioniert so irgendwie nicht.
Geht das denn nicht, wenn ich Strings mit Strings ersetzten will ????
Achso: ich habe RadStudio 2010