フォルダかファイルかを見分けるには

解決

やまねこ 2005-06-18 00:07:39 No: 15757 IP: [192.*.*.*]

ドラッグ＆ドロップを受け入れる
http://www.wwlnk.com/boheme/delphi/tips/tec0050.htm を使って、
エクスプローラからのファイルやフォルダのDrag&Dropをリスト化していますが、
それがファイルなのかフォルダなのかを見分ける方法がわかりません。
どのようにやるか、ご存じの方、ご教示お願いします。

編集削除

やまねこ 2005-06-18 00:44:25 No: 15758 IP: [192.*.*.*]

とりあえず、拡張子があるか無いかで判断しちゃいました。

if ExtractFileExt(FileName)='' then ...

まず拡張子の無いファイルは扱わないので、
とりあえず、これで解決としておきます。

スマートなやり方がありそうですので、
どのようにやるか、ご存じの方いらっしゃいましたらお願いします。

編集削除

deldel 2005-06-18 00:50:25 No: 15759 IP: [192.*.*.*]

拡張子つきのフォルダもありますよね・・・
DirectoryExists はどうですか？

編集削除

やまねこ 2005-06-18 01:09:47 No: 15760 IP: [192.*.*.*]

>DirectoryExists
おっ！
素敵な関数。
ありがとうございました。>deldelさん

編集削除