RTF File Encryption

Please discuss general Delphi programming topics here.

RTF File Encryption

Postby Blod » August 30th, 2011, 2:03 pm

Hi to All,

Is there a known problem in trying to encrypt/Decrypt an RTF file?
I'm only using a low security encryption and it works Ok but it is removing any special font attributes that have been set and displaying results as Plaintext even though plaintext is set to false.


Thanks

Blod

S := rtf1.Text;
For I:= 1 to Length(S) do
S[I] := Chr(Ord(S[I]) xor $ff);
rtf1.Text := S;
rtf1.Lines.SaveToFile('hold.txt');
end;
Blod
Junior Member
Junior Member
 
Posts: 33
Joined: June 5th, 2008, 12:54 pm

Re: RTF File Encryption

Postby sanjai » November 5th, 2011, 3:27 am

hi thanks for the information
sanjai
Member
Member
 
Posts: 1
Joined: November 5th, 2011, 3:26 am

Re: RTF File Encryption

Postby Blod » November 6th, 2011, 5:21 pm

Er, you're Welcome.
Blod
Junior Member
Junior Member
 
Posts: 33
Joined: June 5th, 2008, 12:54 pm


Return to Delphi Programming

Who is online

Users browsing this forum: Google Feedfetcher and 2 guests

cron