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

解決

やまねこ  2005-06-17 15:07:39  No: 15757  IP: 192.*.*.*

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

編集 削除
やまねこ  2005-06-17 15:44:25  No: 15758  IP: 192.*.*.*

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

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

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

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

編集 削除
deldel  2005-06-17 15:50:25  No: 15759  IP: 192.*.*.*

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

編集 削除
やまねこ  2005-06-17 16:09:47  No: 15760  IP: 192.*.*.*

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

編集 削除