現在在用.dat的檔案的內容畫圖，卡在一個地方，就是要畫很多個的時候，我要根據檔案的名稱把圖畫在不同的地方，檔案是ave00.dat或 ave06.dat 等，其中我要根據00、06(當座標位置x=0,y=6)來定每個檔案畫圖的地方。已可以一次開很多的檔案了，也可以一次畫一個檔案。我想要在用TOpenDialog開啟檔案的時候，寫一個判斷式來定畫圖位置，請問各位兄弟，我要如何在用TOpenDialog開啟檔案的時候，去讀到檔案名稱的特定位置(00、06的地方)的字呢? 可以告訴我如何做或可以到哪找方法嗎?? 先感謝各位兄弟的鼎力相助~~~

引言: 現在在用.dat的檔案的內容畫圖，卡在一個地方，就是要畫很多個的時候，我要根據檔案的名稱把圖畫在不同的地方，檔案是ave00.dat或 ave06.dat 等，其中我要根據00、06(當座標位置x=0,y=6)來定每個檔案畫圖的地方。已可以一次開很多的檔案了，也可以一次畫一個檔案。我想要在用TOpenDialog開啟檔案的時候，寫一個判斷式來定畫圖位置，請問各位兄弟，我要如何在用TOpenDialog開啟檔案的時候，去讀到檔案名稱的特定位置(00、06的地方)的字呢? 可以告訴我如何做或可以到哪找方法嗎?? 先感謝各位兄弟的鼎力相助~~~

4880h009 你好: 假設你的檔案名稱都是這樣子的格式 ave00.dat~ave99.dat 的話 請參考以下的範例程式碼 < class="code"> int x=0, y=0; AnsiString szFileName; if(OpenDialog1->Execute()) { szFileName=OpenDialog1->FileName; if(FileExists(szFileName) && ExtractFileName(szFileName).AnsiPos("ave")==1) { x=StrToInt(ExtractFileName(szFileName).SubString(4, 1)); y=StrToInt(ExtractFileName(szFileName).SubString(5, 1)); ShowMessage("(" IntToStr(x) ", " IntToStr(y) ")"); } } -- Enjoy Researching & Developing -- 發表人 - RaynorPao 於 2003/12/09 12:43:09

4880h009 您好：    看不太懂您的需求，原諒小弟太嫩了 您是想用 TOpenDialog 去開啟 .dat 檔 但 TOpenDialog 不是會出現視窗讓您去選您要路徑嗎    所謂『讀到檔案名稱的特定位置(00、06的地方)的字』指的是什麼 麻煩您再說明詳細一點 好讓版上的前輩知道您問題在哪，也方便一針見血的回答      

流兄: 開檔部分已ok了~~現在我有很多個檔案，檔名為ave06.dat等等，我要根據檔名來設定畫圖的位置，例如ave06.dat，我要把這個檔案畫在座標x=0、y=6的地方，而且我在用TOpenDialog開啟檔案的時候，要一次選很多的檔案來開啟(這個已完成了)，現在我不知道要如何在TOpenDialog開啟檔案的時候，讀到檔名ave06.dat中的06檔名… 如此流兄明白嗎~~感謝你哦~~

4880h009 您好：    好像懂了，如果是單純要讀到 ave06 後的 06 那 RaynorPao 前輩的回答就是您要的了  還是 >

初學者 請多多指教

void __fastcall TForm1::Button1Click(TObject *Sender)
{
 char* c;
 if ( OpenDialog1->Execute())
 {
  int i;
  int x[10];
  for ( i=0 ; iFiles->Count;i  )
  {       AnsiString ef=ExtractFileName(OpenDialog1->Files->Strings[i]);
   c=ef.c_str();
   if ((c != NULL) && (c[0] != '\0'))
  {        c =3;
    int L = StrLen(c) 1;
    char *p = (char *)malloc(L);
    StrMove(p, c, L);        char *ptr = strchr(p,'.');        *ptr='\0';        x[i]=atoi(p);        ShowMessage(IntToStr(x[i]));        free(p);
  }
 }     }
}

每天省下一包菸的錢 愛心1000元餵飽一名非洲飢餓兒童 http://www.worldvision.org.tw/edm/30hffan/30hf1000.htm 發表人 - taishyang 於 2003/12/09 13:49:16

------
︿︿

事情解決了~~謝謝各位兄弟的幫忙哦~~