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

判別指定路徑檔案存不存在

尚未結案
metals753
一般會員


發表:7
回覆:3
積分:2
註冊:2005-05-23

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-06-02 22:57:37 IP:218.168.xxx.xxx 未訂閱
#include FILE *file1; void __fastcall TForm1::Button1Click(TObject *Sender) { int m=0,a=0; while(m<=30) { file1=fopen("C:\\homework\\pp" IntToStr(m) ".dat","r "); if (file1==NULL) { fclose(file1) ; } else { a=a 1; Label1->Caption="檔案存在" IntToStr(a); fclose(file1); } } } 我想判別C:\homework\ 路徑底下的pp0.dat~pp30.dat 有幾個檔案是存在的 可是一直出現這個錯誤:Cannot convert 'AnsiString' to 'const char *' 請問哪裡還需要修正??
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-06-02 23:07:23 IP:218.168.xxx.xxx 未訂閱
您好:    PO程式碼的方式請參考版規說明,煩請修改謝謝您的配合 > 您用的是 >
andychang1690
資深會員


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

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-06-02 23:19:36 IP:221.169.xxx.xxx 未訂閱
metals753: taishyang 版大所言 BCB有更方面的函式FileExists()來判斷檔案是否存在
引言: void __fastcall TForm1::Button1Click(TObject *Sender) { AnsiString xFile; int m=0,a=0; while(m<=30) { xFile="C:\\homework\\pp" IntToStr(m) ".dat"; if (FileExists(xFile)) { a=a 1; Label1->Caption="檔案存在" IntToStr(a); } } } 原: #include FILE *file1; void __fastcall TForm1::Button1Click(TObject *Sender) { AnsiString xFile; int m=0,a=0; while(m<=30) { xFile="C:\\homework\\pp" IntToStr(m) ".dat"; file1=fopen(xFile.c_str(),"r "); if (file1==NULL) { fclose(file1) ; } else { a=a 1; Label1->Caption="檔案存在" IntToStr(a); fclose(file1); } } } 我想判別C:\homework\ 路徑底下的pp0.dat~pp30.dat 有幾個檔案是存在的 可是一直出現這個錯誤:Cannot convert 'AnsiString' to 'const char *' 請問哪裡還需要修正?? 請參考紅字部分!程式會更簡單。
------
Andy Chang
metals753
一般會員


發表:7
回覆:3
積分:2
註冊:2005-05-23

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-06-03 19:18:40 IP:218.167.xxx.xxx 未訂閱
引言: metals753: taishyang 版大所言 BCB有更方面的函式FileExists()來判斷檔案是否存在
引言: void __fastcall TForm1::Button1Click(TObject *Sender) { AnsiString xFile; int m=0,a=0; while(m<=30) { xFile="C:\\homework\\pp" IntToStr(m) ".dat"; if (FileExists(xFile)) { a=a 1; Label1->Caption="檔案存在" IntToStr(a); } } } 原: #include FILE *file1; void __fastcall TForm1::Button1Click(TObject *Sender) { AnsiString xFile; int m=0,a=0; while(m<=30) { xFile="C:\\homework\\pp" IntToStr(m) ".dat"; file1=fopen(xFile.c_str(),"r "); if (file1==NULL) { fclose(file1) ; } else { a=a 1; Label1->Caption="檔案存在" IntToStr(a); fclose(file1); } } } 我想判別C:\homework\ 路徑底下的pp0.dat~pp30.dat 有幾個檔案是存在的 可是一直出現這個錯誤:Cannot convert 'AnsiString' to 'const char *' 請問哪裡還需要修正?? 請參考紅字部分!程式會更簡單。 >< face="Verdana, Arial, Helvetica"> 若我想把找尋到的資料一一上傳至我的FTP 部分程式碼如下:
NMFTP1->Mode(MODE_BYTE);
Edit4->Text="test" IntToStr(m);
NMFTP1->Upload(xFile, Edit4->Text);
用上半部的程式確定能找到檔案,不過上傳時會出現找不到指定檔案 必須要給個指定路徑才能正常上傳,請問要怎麼把找到的資料一一自動上傳?
系統時間:2024-11-23 13:13:45
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!