線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1787
推到 Plurk!
推到 Facebook!

Jieshu Backup Files Tool(Delphi7 & Source Code)

 
jieshu
版主


發表:42
回覆:894
積分:745
註冊:2002-04-15

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-05-23 23:56:07 IP:61.70.xxx.xxx 未訂閱
使用過Windows Commander(Total Commander)(http://www.ghisler.com/)的人,就知道他的檔案管理功能有多強,但是卻沒有備份檔案的功能(不是同步目錄喔),例如:我自己的電腦有我寫的程式,Server有一份備份的程式,但是當我的電腦裡面檔案位置變了之後,同步到Server之後,卻要手動找出移動位置的檔案,把他刪除,甚為不便,所以寫了這個程式,順便將程式碼公佈出來,讓有興趣的人可以研究,甚至做出個人檔案管理工具。 註: 1.慶祝個人答題得分破百。 2.對於想控制ShellListView的人會有所幫助。 3.利用GetPropValue和SetPropValue來作多語言切換的功能。 4.利用TStringList來作ini檔的讀寫,和多語言的暫存。 5.由於要紀錄ShellListView的位置,所以放棄和ShellComboBox的關聯,由程式碼控制,因為ShellListView僅可設Root,且設了後會影響ShellComboBox的位置。 6.ShellListView有兩個,如果AutoRefresh設True會有錯誤產生。 7.此程式對於想要作檔案的控制、搜尋有不錯的助益。 畫面如下:
人生有夢,逐夢而行。 人若為善,福雖未至,禍已遠離。 人若為惡,禍雖未至,福已遠離。 http://www.coss.com.tw/jieshu/
------
人生有夢,逐夢而行
人若為善,福雖未至,禍已遠離
人若為惡,禍雖未至,福已遠離
http://www.taconet.com.tw/jieshu/
附加檔案:50615_JsBakFile.zip
jieshu
版主


發表:42
回覆:894
積分:745
註冊:2002-04-15

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-05-24 12:38:13 IP:203.204.xxx.xxx 未訂閱
這程式只是備份功能的略成版,還有很多可加強的地方,有興趣的人可自行添加。舉例如下: fMain 加成和Total Commander一樣的功能,太多了,請自行參考。 fCheck 1.檔名處只顯示檔名,但要加一行顯示目錄的Record(就像Total Commander的同步目錄顯示方式)。 2.不同備份種類,以不同顏色顯示(就像Total Commander的同步目錄顯示方式)。 3.最後狀態的存檔。 4.多重備份設定的存檔,下次可直接選取設定。
人生有夢,逐夢而行。 人若為善,福雖未至,禍已遠離。 人若為惡,禍雖未至,福已遠離。 http://www.coss.com.tw/jieshu/
發表人 - jieshu 於 2004/05/24 13:07:29
------
人生有夢,逐夢而行
人若為善,福雖未至,禍已遠離
人若為惡,禍雖未至,福已遠離
http://www.taconet.com.tw/jieshu/
forth
一般會員


發表:13
回覆:34
積分:9
註冊:2002-10-30

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-05-24 15:26:43 IP:61.218.xxx.xxx 未訂閱
下載來玩一下下發現有 BUG, 按完「..」按鈕再按「上頁」的按鈕,會怪怪的;而且只按「..」也怪怪的 寫程式是建設,除錯是破壞. 寫程式是樂趣,除錯是苦難. 哈! 哈! ....
jieshu
版主


發表:42
回覆:894
積分:745
註冊:2002-04-15

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-05-24 19:13:35 IP:203.204.xxx.xxx 未訂閱
引言: 下載來玩一下下發現有 BUG, 按完「..」按鈕再按「上頁」的按鈕,會怪怪的;而且只按「..」也怪怪的
哈哈!沒注意試,原來「上頁」的功能和「..」是類似的,我原本以為> <><><>< src="http://www.coss.com.tw/jieshu/img/jsDesign.jpg">
人生有夢,逐夢而行。 人若為善,福雖未至,禍已遠離。 人若為惡,禍雖未至,福已遠離。 http://www.coss.com.tw/jieshu/
------
人生有夢,逐夢而行
人若為善,福雖未至,禍已遠離
人若為惡,禍雖未至,福已遠離
http://www.taconet.com.tw/jieshu/
dllee
站務副站長


發表:321
回覆:2519
積分:1711
註冊:2002-04-15

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-05-26 08:03:59 IP:211.76.xxx.xxx 未訂閱
哇!很讚耶  其實 href="http://www.ViewMove.com">http://www.ViewMove.com 視動自動化科技股份有限公司 ViewMove Technologies, Inc.
------
http://www.ViewMove.com
jieshu
版主


發表:42
回覆:894
積分:745
註冊:2002-04-15

發送簡訊給我
#6 引用回覆 回覆 發表時間:2004-05-26 09:43:40 IP:203.204.xxx.xxx 未訂閱
引言: 哇!很讚耶 其實 href="http://www.ViewMove.com">http://www.ViewMove.com 視動自動化科技股份有限公司 ViewMove Technologies, Inc.
謝謝!我原本也在猜他到底是不是Delphi寫的,很像是,但是為什麼他的檔案複製詢問畫面的按鈕,有時候會按不到,像我要按全部覆蓋,他就是從覆蓋→取消→更名,這樣Focus一個一個移,就是按不到,一定要按Alt + A才可以,因為Delphi的特性並不會這樣阿! >< src="http://delphi.ktop.com.tw/loadfile.php?TOPICID=15884137&CC=355243">
人生有夢,逐夢而行。 人若為善,福雖未至,禍已遠離。 人若為惡,禍雖未至,福已遠離。 http://www.coss.com.tw/jieshu/
------
人生有夢,逐夢而行
人若為善,福雖未至,禍已遠離
人若為惡,禍雖未至,福已遠離
http://www.taconet.com.tw/jieshu/
dllee
站務副站長


發表:321
回覆:2519
積分:1711
註冊:2002-04-15

發送簡訊給我
#7 引用回覆 回覆 發表時間:2004-05-26 13:06:44 IP:220.139.xxx.xxx 未訂閱
關於 Plugins 的部分,您可以看一下: http://www.ghisler.com/addons.htm http://www.ghisler.com/plugins.htm http://clubtotal.free.fr/ http://www.totalcmd.net/ 有部分的 Plugins 有提供原始碼。 在這一頁則有目前三種 Plugins 的範例程式 http://clubtotal.free.fr/index.php?dir=Documents/ 大部分的 Plugins 都是用 VC 寫的,有少數是用 Delphi 寫的,如: HTTP browser。 至於我說她也是用 Delphi 開發的原因是,我用過 SPYxx 之類的軟體或是用之前我寫的小工具: 【BCB】取得視窗列表+視窗內所有子視窗元件列表(分層顯示)+顯示/隱藏/改文字 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=30743 查看 TotalCommander 內的視窗名稱,就可以看到 TPanel, TMyXXX 之類的名稱,如果是用 VC 或 VB 就不會有那種東西,另外,官方的範例文件都有會 .h 及 .pas 的檔給 Plugins 開發者,如果是用 VC 寫的,那大部分只會提供 .h,而由這點,應該可以判斷不可能用 VB,也不會是用 VC 而是用 Delphi。 http://www.ViewMove.com 視動自動化科技股份有限公司 ViewMove Technologies, Inc.
------
http://www.ViewMove.com
jieshu
版主


發表:42
回覆:894
積分:745
註冊:2002-04-15

發送簡訊給我
#8 引用回覆 回覆 發表時間:2004-05-26 20:03:26 IP:203.204.xxx.xxx 未訂閱
引言: 關於 Plugins 的部分,您可以看一下: http://www.ghisler.com/addons.htm http://www.ghisler.com/plugins.htm http://clubtotal.free.fr/ http://www.totalcmd.net/ 有部分的 Plugins 有提供原始碼。 在這一頁則有目前三種 Plugins 的範例程式 http://clubtotal.free.fr/index.php?dir=Documents/ 大部分的 Plugins 都是用 VC 寫的,有少數是用 Delphi 寫的,如: HTTP browser。 至於我說她也是用 Delphi 開發的原因是,我用過 SPYxx 之類的軟體或是用之前我寫的小工具: 【BCB】取得視窗列表+視窗內所有子視窗元件列表(分層顯示)+顯示/隱藏/改文字 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=30743 查看 TotalCommander 內的視窗名稱,就可以看到 TPanel, TMyXXX 之類的名稱,如果是用 VC 或 VB 就不會有那種東西,另外,官方的範例文件都有會 .h 及 .pas 的檔給 Plugins 開發者,如果是用 VC 寫的,那大部分只會提供 .h,而由這點,應該可以判斷不可能用 VB,也不會是用 VC 而是用 Delphi。 http://www.ViewMove.com 視動自動化科技股份有限公司 ViewMove Technologies, Inc.
大概的看了一下,他好像只有壓縮、檔案系統、和檢視有Plugins,我寫的這種不曉得有沒有,我主要是要能夠抓到他選的資料夾,和兩邊的目前目錄位置,還有要從哪裡執行。 那就應該是用Delphi沒錯,可是怎麼會有那種怪現象,今天在找> <><><>< src="http://www.coss.com.tw/jieshu/img/jsDesign.jpg">人生有夢,逐夢而行。 人若為善,福雖未至,禍已遠離。 人若為惡,禍雖未至,福已遠離。 http://www.coss.com.tw/jieshu/
------
人生有夢,逐夢而行
人若為善,福雖未至,禍已遠離
人若為惡,禍雖未至,福已遠離
http://www.taconet.com.tw/jieshu/
dllee
站務副站長


發表:321
回覆:2519
積分:1711
註冊:2002-04-15

發送簡訊給我
#9 引用回覆 回覆 發表時間:2004-05-27 17:19:33 IP:220.139.xxx.xxx 未訂閱
以您的應用,可以把 Plugins 定位在 FileSystemPlugins 這類的 Plugins 可以在「[-\-] 網路上的芳鄰」中多一個目錄, 您可以在選進那個目錄後,將使用者電腦內的磁碟機都 Mapping 進去,這樣,使用者可以選擇要 Backup 的目錄,另一邊則是 Source,此時,不論是從那邊 Copy 到那邊,TotalCommander 都會通知 Plugins 來處理, 或許您要在此時直接另開一個 fCheck 視窗也行(我猜的啦... 我也沒真的寫過,只是用得較久而已 )。 另外,您說的問題,我是沒遇到過,看您要不要更新到最新的 href="http://www.ViewMove.com">http://www.ViewMove.com 視動自動化科技股份有限公司 ViewMove Technologies, Inc.
------
http://www.ViewMove.com
jieshu
版主


發表:42
回覆:894
積分:745
註冊:2002-04-15

發送簡訊給我
#10 引用回覆 回覆 發表時間:2004-05-28 19:28:42 IP:203.204.xxx.xxx 未訂閱
引言: 以您的應用,可以把 Plugins 定位在 FileSystemPlugins 這類的 Plugins 可以在「[-\-] 網路上的芳鄰」中多一個目錄, 您可以在選進那個目錄後,將使用者電腦內的磁碟機都 Mapping 進去,這樣,使用者可以選擇要 Backup 的目錄,另一邊則是 Source,此時,不論是從那邊 Copy 到那邊,TotalCommander 都會通知 Plugins 來處理, 或許您要在此時直接另開一個 fCheck 視窗也行(我猜的啦... 我也沒真的寫過,只是用得較久而已 )。 另外,您說的問題,我是沒遇到過,看您要不要更新到最新的 href="http://www.ViewMove.com">http://www.ViewMove.com 視動自動化科技股份有限公司 ViewMove Technologies, Inc.
應該是FileSystemPlugins沒錯,不過這樣做起來好像很複雜,我還要自己去產生資料夾,原本想說在原本的畫面,按了某個按鈕後,叫出fCheck畫面,且可以知道選了哪些資料夾,所以可能簡化程式成只有fCheck,且能獨立選擇備份目錄和來源目的目錄位置,且可儲存多項設定,這樣設定一個按鈕來呼叫執行檔應該會比較簡單,不過還是很感謝你對FileSystemPlugins的講解。 那些問題,有時候電腦重開後又不會了,並不是一直會這樣,不曉得是不是被Delphi給干擾了。
人生有夢,逐夢而行。 人若為善,福雖未至,禍已遠離。 人若為惡,禍雖未至,福已遠離。 http://www.coss.com.tw/jieshu/
------
人生有夢,逐夢而行
人若為善,福雖未至,禍已遠離
人若為惡,禍雖未至,福已遠離
http://www.taconet.com.tw/jieshu/
系統時間:2024-11-22 1:11:25
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!