JpegかBitmap以外のファイルをオープンできなくしたい

解決

---

ある特定の拡張子以外のファイルをオープンできないようにしたいのですがどのようにしたら良いのでしょうか？基本的な質問ですみません。今までエラー処理はデルファイに頼りきっていたので自分でどうやったら良いのか分からなくなってしまいました。

編集    削除

---

ExtractFileExtで拡張子を取得し、判別してください。
大文字小文字にも注意。

編集    削除

---

超速なお答えありがとうございます。

OpenDialogのオブジェクトインスペクタのFilterプロパティで特定のファイルしか読めないようにしました。
お答えのExtractFileExtと言うのをはじめて聞いたのでよろしければもう少し詳しい説明をお願いします。

編集    削除

---

例えば、
strExt := ExtractFileExt('C:\hogehoge\file.jpeg');
だと、strExtには'.jpeg'が入ります。
その他、
ExtractFilePath
ExtractFileDir
ExtractFileDrive
ExtractFileName
ChangeFileExt
などなどがあります。
ヘルプをご覧下さい。使い方はとても簡単ですから。

編集    削除

---

なるほど！ここの掲示板はいつもためになりますね。ありがとうございます。

編集    削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。