Einzelnen Beitrag anzeigen

crisbinfranke

Registriert seit: 27. Okt 2009
11 Beiträge
 
#1

Zeichen aus einem TMemo löschen

  Alt 17. Mär 2011, 20:46
Guten Abend liebe Delphi Fans.
Ich bin grade dabei mich ein wenig mit der Steganographie in
Verbindung mit Delphi zu beschäftigen und hänge nun...
Und zwar schmeißt mir mein Programm ein Zeichen zu viel in einem
Memo Feld aus.Ich habe es mit folgendem Code probiert, aber leider verschwindet das
Zeichen nicht. Weiß jemand von euch eine eventuell andere Lösung?

Code:
procedure TForm1.Button1Click(Sender: TObject);
var dertext: string;
begin
  dertext := Memo1.Text;
  dertext := StringReplace(dertext,'@','',[rfReplaceAll]);
  Memo1.Text := dertext;
end;
p.s. wieso ich grade ein @ löschen will? Meine Abbruchbedingen zum durchsuchen des Textes sind 2x @ und eines wird aus irgendeinem Grund übernommen. Ist zwar nicht die richtige Art, aber ich möchte das es optisch funktioniert
  Mit Zitat antworten Zitat