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

想使存檔的檔名跟開啟的檔名相同~

尚未結案
黑輪
中階會員


發表:135
回覆:188
積分:64
註冊:2004-01-29

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-05-30 17:44:05 IP:61.228.xxx.xxx 未訂閱
 
    Memo1->Lines->LoadFromFile(OpenDialog1->FileName);    ...
  FILE *data1;
  data1=fopen("angle 存檔的名字.txt", "wt");
想要使"存檔的名字"跟開啟的檔案(OpenDialog1->FileName)名字相同,例如開啟p1_30.jpg,想要後來所存的檔名為angle_p1_30.txt 應該要如做?(取出開啟的檔名,不要有副檔名,我不知道要如何做)
GGL
資深會員


發表:104
回覆:600
積分:335
註冊:2006-11-05

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-05-30 18:19:19 IP:211.76.xxx.xxx 未訂閱
要是我,我會先對開檔的檔名做字串的處理,除去副檔名,然後再跟你要更改的副檔名合併,在存檔
g6101
高階會員


發表:22
回覆:129
積分:110
註冊:2002-06-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-05-30 20:17:45 IP:163.29.xxx.xxx 未訂閱
黑輸您好: 以下的方法試試看 AnsiString TextFileName = ChangeFileExt(OpenDialog1->FileName,".TXT"); ◎天長地久有時盡,追求知識無絕期!
黑輪
中階會員


發表:135
回覆:188
積分:64
註冊:2004-01-29

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-05-30 20:44:59 IP:61.228.xxx.xxx 未訂閱
GGL說得對,如果要更有彈性的做,應該要先處理,除掉不要的,或取出想要的部份,可是我不會做~~可以教我一下嗎~~或是有什麼例子 感謝大家~
GGL
資深會員


發表:104
回覆:600
積分:335
註冊:2006-11-05

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-05-30 21:14:36 IP:211.76.xxx.xxx 未訂閱
   AnsiString filename;
   if(OpenDialog1->Execute())
   {
      filename=OpenDialog1->FileName.SubString(1,OpenDialog1->FileName.LastDelimiter(".")-1);
   }
這樣filename就只有路徑 檔名(沒有副檔名)了
4880h009
一般會員


發表:32
回覆:43
積分:15
註冊:2003-11-26

發送簡訊給我
#6 引用回覆 回覆 發表時間:2004-06-22 01:53:30 IP:61.228.xxx.xxx 未訂閱
請問一下GGL,哪如果只想有檔名要如何做啊?(不要有副檔名與路徑) 謝謝哦
bass15
高階會員


發表:24
回覆:171
積分:119
註冊:2003-10-27

發送簡訊給我
#7 引用回覆 回覆 發表時間:2004-06-23 14:19:51 IP:61.66.xxx.xxx 未訂閱
   AnsiString filename;
   if(OpenDialog1->Execute())
   {
      filename=ExtractFileName(OpenDialog1->FileName); //去掉路徑
      filename=ChangeFileExt(filename,"");             //把副檔名改成空值
   }
 
發表人 - bass15 於 2004/06/23 14:24:19
黑輪
中階會員


發表:135
回覆:188
積分:64
註冊:2004-01-29

發送簡訊給我
#8 引用回覆 回覆 發表時間:2004-08-05 00:07:39 IP:61.228.xxx.xxx 未訂閱
po一下我的做法~
 
szName=ExtractFileName(szFileName);//取出檔名與副檔名
szExt=ExtractFileExt(szFileName);//取出副檔名
szNewFile=szName.SubString(1,szName.Length()-szExt.Length());//剩檔名     AnsiString szSubStr=szNewFile.SubString(1,5);//可以取出指定位置的字
系統時間:2024-06-28 5:16:04
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!