Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.624 Beiträge
Delphi 12 Athens
|
AW: Memo bestimmte Zeichen löschen
26. Jan 2015, 13:26
Zitat:
Memo1.Lines.Strings[-1]
Worauf willst Du denn da zugreifen? Ich würde mir den kompletten Text in einer Variablen zwischenspeichern, diese dann bearbeiten und zum Schluss im Ganzen wieder zurückschreiben. Aus dem Kopf:
Delphi-Quellcode:
var
MemoText: string;
begin
MemoText := Memo1.Lines.Text;
MemoText := StringReplace(MemoText, '<message>', '', [rfReplaceAll, rfIgnoreCase]);
MemoText := StringReplace(MemoText, '</message>', '', [rfReplaceAll, rfIgnoreCase]);
// usw.
Memo1.Lines.Text := MemoText;
end;
Detlef "Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|