できると何かと便利なDrag&Drop。
きっとできるだろうと思ってヘルプ見てみたらやっぱりありました。
けど、サンプルどおりだと動かなくて、
ちょっと手直ししました。
------------
; ドラッグ&ドロップ
#include "llmod3/llmod3.hsp"
#include "llmod3/dragdrop.hsp"
;ドラッグ&ドロップされたファイル名を入れる変数
alloc strDropFilePaths, 1024*64
dd_accept strDropFilePaths, nDropNum
*DDLoop
wait 10
if nDropNum {
cls
pos 0,0
mes "ドラッグ&ドロップされたファイル数:" + nDropNum
mes strDropFilePaths
; nDropNumをリセット
nDropNum = 0
}
goto *DDLoop
------------
dd_acceptで受け入れ開始して、
あとは、Numのリセットを忘れなければいいだけっぽいです。
簡単。
ちなみにdd_rejectで受け入れ停止(D&Dできないようにする)ができるので、
取得した後にdd_rejectするっていうケースもありそうです。