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

解決

あきお 2002-04-10 23:52:47 No: 775

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

にしの 2002-04-11 00:16:15 No: 776

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

あきお 2002-04-11 00:40:42 No: 777

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

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

にしの 2002-04-11 00:52:39 No: 778

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

あきお 2002-04-11 00:59:50 No: 779

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