Delphi Inhalt eines Memos binär speichern?

Thema durchsuchen

Ansicht

Themen-Optionen

Inhalt eines Memos binär speichern?

Ein Thema von Yakumo500 · begonnen am 3. Feb 2009 · letzter Beitrag vom 8. Feb 2009

Vorheriger Beitrag

Nächster Beitrag

guidok

Registriert seit: 28. Jun 2007
417 Beiträge

#15

Re: Inhalt eines Memos binär speichern?

8. Feb 2009, 09:05

Warum machst du es dir denn so kompliziert?

1. Schreib deine Strings in eine TStringList.
2. Geh die Liste Zeichen für Zeichen durch und "verschlüssele" jedes Zeichen mit eine XOR-Verknüpfung.
3. Rufe TStringList.SaveToFile auf

Das Laden geht mit TStringList.LoadFromFile, danach musst du wieder jedes einzelne Zeichen mit dem selben Wert XOR Verknüpfen und gut ist.