AES加密TIniFile |
|
webber
初階會員 發表:54 回覆:76 積分:26 註冊:2004-04-20 發送簡訊給我 |
參考 領航天使 大大 所發表的 AES加密演算法Delphi程式範例 所寫成
http://delphi.ktop.com.tw/topic.php?method=AddScore&topic_id=28295&ToMemberID=1 用法和TIniFile相同 在function TEncryptedIniFile.Decypt(s:String):String;中
解密出來的資料會有換行符號
所以我是下面的方法解決
text.Text:=Dest.DataString;
result := text.DelimitedText;
總覺得怪怪的。。。怎麼會有換行符號.... 另外,也會判斷是否已加密
若未加密會自動重新加密所有屬性
若ini檔中有下列屬性則代表有加密 [TEncryptedIniFile]
Encrypted=true 我覺得比較有效率的方式是在讀檔和寫檔時才加密
但是。。。小弟的功力不夠
還請各位前輩多多指點< >< > 讀萬卷書、行萬里路
求神問卜、問Google 都不如上K.Top |
SENFO
一般會員 發表:13 回覆:22 積分:7 註冊:2006-07-10 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |