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

急.....請問..如何取得檔案在該目錄的index

尚未結案
Elsa-fen
一般會員


發表:9
回覆:16
積分:5
註冊:2003-09-25

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-12-25 16:26:18 IP:61.221.xxx.xxx 未訂閱
不好意思..請問一下..如何取得某一個檔案在該目錄裡的index是多少?? 謝謝...
minjiu
中階會員


發表:27
回覆:119
積分:69
註冊:2002-06-26

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-12-25 16:35:29 IP:218.164.xxx.xxx 未訂閱
檔案在該目錄裡的index是多少?? 不懂妳說的意思??能說清楚一點嗎??
skurama
中階會員


發表:88
回覆:127
積分:73
註冊:2002-07-22

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-12-25 16:49:48 IP:61.219.xxx.xxx 未訂閱
因為不太懂所謂的檔案Index, 不過有一個語法是按照該目錄中檔案順序來尋找檔案, 不知道這樣是否是你要的功能,程式如下: --------------------------------------------------------------- var f : tSearchrec; i : integer; begin i := 0; //index通常是由0開始 //取得檔案,$00000020表示任何檔案,不含目錄 //第一個參數除了資料夾路徑外,記得要加上*.* if findfirst('c:\windows\*.*',$00000020,f) = 0 then begin repeat //注意檔名大小寫 if f.name = '你要的檔名' then begin //此時I的值不知道是不是你說的檔案Index showmessage(inttostr(i)); break; end; inc(i); until findnext(f) <> 0; FindClose(f); end; end; --------------------------------------------------------------- 因為FindFirst function的說明是 searches the directory specified by Path for the first file 所以我覺得如果在該目錄用repeat找的檔案,會是照你所說的index來找, 不知道是不是你要的, 參考參考 ---------------- 昂首千丘遠, 嘯傲風間, 堪尋敵手共論劍, 高處不甚寒! ----------------
------
----------------
初出芧房程設師,
左鍵右鼠寫程式,
日扣夜寫眼框溼,
望能早成系分師。
----------------
Elsa-fen
一般會員


發表:9
回覆:16
積分:5
註冊:2003-09-25

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-12-25 17:34:51 IP:61.221.xxx.xxx 未訂閱
不好意思skurama兄..我要的可能不是您這個做法.. 現在我要做的是 例如:test資料夾內有30個檔案.. 而我只要copy test裡面的第10到20的檔案到test2 並不是對應檔案名稱.. 在delphi裡有這方面的index函數嗎?
CuteBabyBoy
初階會員


發表:18
回覆:97
積分:48
註冊:2003-07-11

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-12-26 11:18:10 IP:218.167.xxx.xxx 未訂閱
第10到20的檔案 ?? 那請問您的檔名型態固定嗎 ? 不然即使取到檔案名,也可能不是妳所預期的
Elsa-fen
一般會員


發表:9
回覆:16
積分:5
註冊:2003-09-25

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-12-26 11:34:15 IP:61.221.xxx.xxx 未訂閱
CuteBabyBoy 我的檔案類型的確是不一樣的..所以..沒辦法用抓檔名的方式.. 請問還有其他辦法嗎??
CuteBabyBoy
初階會員


發表:18
回覆:97
積分:48
註冊:2003-07-11

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-12-26 16:39:40 IP:218.167.xxx.xxx 未訂閱
哈...原來我跑到 Delphi 的討論區ㄚ...^^    沒關係...分享 BCB 的寫法...看對妳有沒有幫助         
 
void __fastcall LoopFindFile(std::vector &FileList,AnsiString Directory)
{
        struct ffblk ffblk;
        AnsiString change;
        int done;            done = findfirst((Directory AnsiString("\\*.*")).c_str(),&ffblk,FA_DIREC);
 
 
        int        Num=1;
 
 
        while(!done)
        {
                change = ffblk.ff_attrib;                    if(StrToInt(change.c_str()) <  30)
                {
                        if((strcmp(ffblk.ff_name,".")!=0)&&(strcmp(ffblk.ff_name,"..")!=0))
                        {
                                LoopFindFile(FileList,Directory  AnsiString("\\") ffblk.ff_name);
                        }
                }
                else
                {
 
 
                        if(Num>=10) && (Num<=20)
                        {
 
 
                             ; Copy Your File
 
  
                       }   
                        Num  ;
 
 
                }                    done = findnext(&ffblk);
        }    }
//---------------------------------------------------------------------------
 
 
Baby
pceyes
尊榮會員


發表:70
回覆:657
積分:1140
註冊:2003-03-13

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-12-26 21:46:37 IP:211.76.xxx.xxx 未訂閱
請問要用檔名排序還是要用日期時間排序, 當然也可以用檔案大小排序, 主要你要先想需求是什麼 努力會更接近成功
------
努力會更接近成功
Elsa-fen
一般會員


發表:9
回覆:16
積分:5
註冊:2003-09-25

發送簡訊給我
#9 引用回覆 回覆 發表時間:2003-12-27 11:30:46 IP:210.66.xxx.xxx 未訂閱
引言: 請問要用檔名排序還是要用日期時間排序, 當然也可以用檔案大小排序, 主要你要先想需求是什麼 努力會更接近成功
不好意思...我是要用檔名排序呢...
Mickey
版主


發表:77
回覆:1882
積分:1390
註冊:2002-12-11

發送簡訊給我
#10 引用回覆 回覆 發表時間:2003-12-29 21:14:33 IP:218.32.xxx.xxx 未訂閱
Elsa-fen 你好: 曾經幫網友, 做過 FileListBox 排序元件, Open Source, 希望有幫助. http://delphi.ktop.com.tw/topic.php?TOPIC_ID=38370
Elsa-fen
一般會員


發表:9
回覆:16
積分:5
註冊:2003-09-25

發送簡訊給我
#11 引用回覆 回覆 發表時間:2004-01-08 09:55:28 IP:61.221.xxx.xxx 未訂閱
引言: Elsa-fen 你好: 曾經幫網友, 做過 FileListBox 排序元件, Open Source, 希望有幫助. http://delphi.ktop.com.tw/topic.php?TOPIC_ID=38370
謝謝Mickey版主提供這個source....我再試試看好了..謝謝..
系統時間:2024-05-21 22:53:05
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!