請教各位前輩    使用OpenDialog中﹐如果只想顯示*.dat和*.xls的檔案及目錄名﹐該如何設定﹒ 記得有看到過﹐但好像忘記了< >﹐懇謝﹗ （這個問題貼在這里應該沒有錯吧﹐< >有點怕怕的感覺說） 謝謝﹗ 努力,相信會獲得美麗! 忻晟

------
忻晟

procedure TForm1.Button1Click(Sender: TObject); begin OpenDialog1.Filter := 'dat files (*.dat)|*.dat|xls files (*.xls)|*.xls'; OpenDialog1.Execute; end; TRY TRY SEE

較簡單的方法的直接在 OpenDialog 的元件的 Filer 設定，左邊是顯示的名字，左邊是 Mask 若想同時數個 Mask 可以用 ; 相隔，如 Supported Files|*.dat;*.xls 目錄方面，你可在 InitDir 設定開始目錄，但目錄不能 Mask，你最多可以在 Options 設定 ofNoChangeDir 不讓使用者改變目錄。 另外你也可設定 ofFileMustExist 使使用者不能輸入一個不存在的檔名按 確定。

謝謝兩位前輩的指教﹒    Justmade前輩的解答比較完美一些﹐所以... 同樣的﹐萬分感謝 > 努力,相信會獲得美麗! 忻晟 發表人 -

------
忻晟

請教各位    All (*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf)|*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf|JPEG Image File (*.jpg)|*.jpg|JPEG Image File (*.jpeg)|*.jpeg|Bitmaps (*.bmp)|*.bmp|Icons (*.ico)|*.ico|Enhanced Metafiles (*.emf)|*.emf|Metafiles (*.wmf)|*.wmf    以上是OpenDialog 的元件的 Filer 設定的預設值..    但是在run的時候發現.. 1.並不是所有的圖檔格式都會出現. 2.重新寫另外一個程式在開圖檔時,可以開啟所有種類的圖檔,但是在開啟.jpg檔的時候有時是正常,但是有的時候確會出現錯誤訊息!!如下: Project project1.exe raised exception class EJPEG with message 'JPEG error #52'. Process stopped. Use Steop or Run to continue.    請問要如何解決呢?    程式如下 void __fastcall TForm1::LoadPictureClick(TObject *Sender) {         if(OpenPictureDialog1->Execute())         {                 Image1->Picture->LoadFromFile(OpenPictureDialog1->FileName);         } }    謝謝.. 或是哪邊有開啟圖檔的教學文章或是完整的範例.. 多謝了..< >< >