參考 領航天使 大大 所發表的 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

附加檔案：79231_EncryptedIniFile.rar

大大可否做BCB版的，感謝...