觀看檔案<圖檔>的細目出不來 |
尚未結案
|
2ujioggl
一般會員 發表:16 回覆:15 積分:6 註冊:2003-05-23 發送簡訊給我 |
|
taishyang
站務副站長 發表:377 回覆:5490 積分:4563 註冊:2002-10-08 發送簡訊給我 |
|
2ujioggl
一般會員 發表:16 回覆:15 積分:6 註冊:2003-05-23 發送簡訊給我 |
一開始就讀圖檔出來
void __fastcall TForm1::FormCreate(TObject *Sender) { TListItem *ListItem; TSearchRec sr; int iPicCount(); ImageList1->Clear(); ListView1->Items->Clear(); String Path("C:\\record"); if(!FindFirst((Path "\\" "*.jpeg"),faAnyFile,sr)){ do{ //ShowMessage(sr.Name); TJPEGImage *pjpeg=new TJPEGImage();//要先載入Jpeg.hpp try{ pjpeg->LoadFromFile(Path "\\" sr.Name); } catch(...){ ShowMessage(Path "\\" sr.Name); } Graphics::TBitmap *bufbmp = new Graphics::TBitmap(); bufbmp->Height=120; bufbmp->Width=110; bufbmp->Canvas->StretchDraw(Rect(1,1,110,120),pjpeg); ListItem=ListView1->Items->Add(); ListItem->Caption=sr.Name; ListItem->ImageIndex=ImageList1->Add(bufbmp,NULL); delete pjpeg; delete bufbmp; Application->ProcessMessages(); } while(!FindNext(sr)); } } 若選了其中一圖就在image秀出來 void __fastcall TForm1::ListView1Click(TObject *Sender) { if(ListView1->SelCount){ String Path("C:\\record"); String Filename= ListView1->Selected->Caption;//取得檔名 Image1->Picture->LoadFromFile(Path "\\" Filename); } }taishyang版主你好: 這幾天我的browser的編碼設成了unicode所以就不能回文章^^ 我的錯 嘿 還有我自已想了一個問題就是我這一支程式本來就只有傳圖而已,根本沒有 傳入檔案的資訊,是嗎? 出不來是正常的 發表人 - taishyang 於 2003/10/09 18:49:30 |
taishyang
站務副站長 發表:377 回覆:5490 積分:4563 註冊:2002-10-08 發送簡訊給我 |
2ujioggl您好:
請參考下面連結作適當的修改
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=37787
謝謝您的配合
class="code">
TSearchRec FRec;
FindFirst(Application->ExeName, faAnyFile, FRec);
ShowMessage("大小:" IntToStr(FRec.Size));
ShowMessage("建立日期:" FormatDateTime("yyyy-mm-dd",FileDateToDateTime(FRec.Time)));
ShowMessage("建立時間:" FormatDateTime("hh:nn:ss",FileDateToDateTime(FRec.Time)));
順心 <>~我也是在學習的階段,回答的不好請您多多見諒與指教~> 發表人 -
|
2ujioggl
一般會員 發表:16 回覆:15 積分:6 註冊:2003-05-23 發送簡訊給我 |
|
2ujioggl
一般會員 發表:16 回覆:15 積分:6 註冊:2003-05-23 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |