全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1671
推到 Plurk!
推到 Facebook!

想問一個讀檔的問題

尚未結案
nospy
一般會員


發表:4
回覆:7
積分:2
註冊:2004-11-15

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-11-15 12:00:56 IP:140.129.xxx.xxx 未訂閱
我現在要將一個檔案加密 卻不知道如何將檔案讀進來 (不是讀檔案內容,而是一整個檔案) 希望知道的大大指教一下
lu
高階會員


發表:11
回覆:189
積分:195
註冊:2003-11-19

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-11-15 12:51:42 IP:221.169.xxx.xxx 未訂閱
最簡單的方式,就是用 TMemoryStream 直接讀進來,再做加密,程式碼如下    
TmemoryStream *Fs = new TMemoryStream;
Fs->ReadFromFile ("C:\\Test.dat");   //讀檔案
//加密資料
Fs->SaveToFile ("C:\\Test1.obj");    //儲存檔案
delete Fs;
參考看看吧 ========================= 大家一起快樂寫程式
nospy
一般會員


發表:4
回覆:7
積分:2
註冊:2004-11-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-11-15 13:49:36 IP:140.129.xxx.xxx 未訂閱
感謝lu的回應 我試了一下你的方法 我覺得你的方法應該是用在讀檔案內容 可是我想做的是加密整個檔案 用一個a.txt檔來舉例 a.txt檔打開後寫著內容"abcdefgh" 我要加密的是一整個檔案a.txt 而非要加密"abcdefgh" 所以我需要知道如何將檔案讀入來讓我加密
lu
高階會員


發表:11
回覆:189
積分:195
註冊:2003-11-19

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-11-15 18:32:24 IP:221.169.xxx.xxx 未訂閱
引言: 我覺得你的方法應該是用在讀檔案內容 可是我想做的是加密整個檔案 用一個a.txt檔來舉例 a.txt檔打開後寫著內容"abcdefgh" 我要加密的是一整個檔案a.txt 而非要加密"abcdefgh" 所以我需要知道如何將檔案讀入來讓我加密
上面紅色部分是什麼意思? 你要將一個檔案加密,一般來說,步驟就是 >我要加密的是一整個檔案>?? 將" class="code"> void __fastcall EncodeFile (String FileName) { TmemoryStream *Fs = new TMemoryStream; Fs->ReadFromFile (FileName); //讀檔案 //加密資料 Fs->SaveToFile (FileName); //儲存檔案 delete Fs; } 是嗎? 這樣你可以直接呼叫,該FUNCTION,將a.txt 加密 如果是的話,中間的加密部分你要自己寫喔 ========================= 大家一起快樂寫程式
andychang1690
資深會員


發表:20
回覆:694
積分:442
註冊:2003-03-14

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-11-16 00:49:21 IP:221.169.xxx.xxx 未訂閱
nospy: http://delphi.ktop.com.tw/topic.php?topic_id=29414 以 Windows CryptoAPI 實做 BCB_Delphi 檔案字串加解密 發表人:bruce0211 建議你可以K一下參考! http://delphi.ktop.com.tw/topic.php?topic_id=46688 【BCB】【問題】字串加密傳送 答題得分者為:RaynorPao http://delphi.ktop.com.tw/topic.php?topic_id=46348 【BCB】【問題】有關CryptoAPI中的加解密方式~~ 答題得分者為:RaynorPao http://delphi.ktop.com.tw/topic.php?topic_id=42038 【BCB】【問題】加密問題... 答題得分者為:RaynorPao http://delphi.ktop.com.tw/topic.php?topic_id=30028 【BCB】【問題】如何為 XML 文件加密 答題得分者為:taishyang http://delphi.ktop.com.tw/topic.php?topic_id=25183 【BCB】【問題】加解密API 答題得分者為:RaynorPao 以上為BCB本園地搜尋所得到結果 請參考! Andy Chang
------
Andy Chang
nospy
一般會員


發表:4
回覆:7
積分:2
註冊:2004-11-15

發送簡訊給我
#6 引用回覆 回覆 發表時間:2004-11-16 11:05:45 IP:140.129.xxx.xxx 未訂閱
我要加密的是一整個檔案a.txt,而非要加密"abcdefgh"?? ========================================================== 用壓縮的方式來看好了 如果要壓縮a.txt這個檔 要做的方式應該是壓縮a.txt這個檔,產生新的值 而非去壓縮a.txt檔裡的內容...再把壓縮後的值放回a.txt    我的意思是這樣
lu
高階會員


發表:11
回覆:189
積分:195
註冊:2003-11-19

發送簡訊給我
#7 引用回覆 回覆 發表時間:2004-11-16 12:16:00 IP:221.169.xxx.xxx 未訂閱
引言: 用壓縮的方式來看好了 如果要壓縮a.txt這個檔 要做的方式應該是壓縮a.txt這個檔,產生新的值 而非去壓縮a.txt檔裡的內容...再把壓縮後的值放回a.txt
問題是,如果要壓縮a.txt這個檔 就是去壓縮a.txt檔裡的內容...再把壓縮後的值放回a.txt 不然你以為程式要如何寫? 別忘了,資訊界的名言 電腦只會按照妳的『指令』辦事,而不是按照妳的『希望』做事 你的『希望』是壓縮A.TXT 而壓縮A.TXT的指令就是 1. 把檔案打開,並打裡面的資料讀出來 2. 將檔案內的資料加密 3. 存回A.TXT 除此之外,偶還沒有想出其他的方法..... ========================= 大家一起快樂寫程式
nospy
一般會員


發表:4
回覆:7
積分:2
註冊:2004-11-15

發送簡訊給我
#8 引用回覆 回覆 發表時間:2004-11-16 17:22:59 IP:140.129.xxx.xxx 未訂閱
我要加密的是檔案的位元組 不知道這樣講有沒有比較清楚
lu
高階會員


發表:11
回覆:189
積分:195
註冊:2003-11-19

發送簡訊給我
#9 引用回覆 回覆 發表時間:2004-11-16 17:59:07 IP:221.169.xxx.xxx 未訂閱
引言: 我要加密的是檔案的位元組 不知道這樣講有沒有比較清楚
沒有~~更模糊< > 什麼是檔案的位元組?? <>檔案的位元組和<>檔案的內容有啥不同?? 唉~~請將你的想法,清楚而明白的寫出來,不然其他人大概只能望文興嘆了< > ========================= <>大家一起快樂寫程式
nospy
一般會員


發表:4
回覆:7
積分:2
註冊:2004-11-15

發送簡訊給我
#10 引用回覆 回覆 發表時間:2004-11-16 18:42:08 IP:140.129.xxx.xxx 未訂閱
嗯嗯 我覺得我舉的例子不太好    現在我開兩個檔一個是word一個是txt 兩個內容都寫abcdefg     word大小為23.5 KB (24,064 位元組)     txt大小為7 個位元組 (7 位元組)    我想要的加密為 把word的24,064 位元組來加密 把txt的7 個位元組來加密    
nospy
一般會員


發表:4
回覆:7
積分:2
註冊:2004-11-15

發送簡訊給我
#11 引用回覆 回覆 發表時間:2004-11-16 23:11:08 IP:140.129.xxx.xxx 未訂閱
我困在自己的思緒中太深了 lu大大的想法沒錯 謝謝lu大大不厭其煩的回文 感恩阿    我做了小測試發現用txt檔寫東西裡面寫什麼就是什麼 用word寫東西會額外加一些拉哩拉紮的東西 若用TMemoryStream來讀資料與加密資料的方法是可行的    現在又出現新問題了 若要擴充到對任意檔案作加密 讀進來的值不是
lu
高階會員


發表:11
回覆:189
積分:195
註冊:2003-11-19

發送簡訊給我
#12 引用回覆 回覆 發表時間:2004-11-17 09:31:06 IP:221.169.xxx.xxx 未訂閱
引言: 現在又出現新問題了 若要擴充到對任意檔案作加密 讀進來的值不是1~9 a~z 我的aes必須在這範圍內 傷腦筋ㄋㄟ
這是你加密演算法的問題嘍,建議你搜尋一下站內的文章,有粉多關於加密演算法的問題 ========================= 大家一起快樂寫程式
nospy
一般會員


發表:4
回覆:7
積分:2
註冊:2004-11-15

發送簡訊給我
#13 引用回覆 回覆 發表時間:2004-11-17 20:57:42 IP:140.129.xxx.xxx 未訂閱
爬了一下文章 找到解決的方法了    就是把memory的資料 放到char裡讀出來為1byte< > 我的程式終於可以繼續寫下去了< > 這裡真是個挖寶的地方阿< > 謝謝各位囉< >
系統時間:2024-05-15 10:01:42
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!