abでメモ帳や秀丸のようにファイルをexeに直接ドラックする方法

[たかせ]

abでメモ帳や秀丸のようにテキストファイル（たとえば）をexeに直接ドラックし、そのファイルを受け取るにはどのような方法がありますか？

受け取る時のイベントなど

よろしくお願いします。

[ゲスト]

このページの検索欄に、ドラッグ＆ドロップと入力し検索ボタンをクリックすると、必要な情報が表示されますょ。

[三毛CAT]

exeのアイコンにドロップする場合は、

コード: 全て選択

#N88BASIC'サンプル用
Dim buf[MAX_PATH] As Byte
Dim filename As String
GetModuleFileName(0,buf,MAX_PATH)
filename=Mid$(MakeStr(GetCommandLine()),Len(MakeStr(buf))+3)
Print a'サンプル用

とするとコマンドラインが取得できます。

[三毛CAT]

コードの最終行の

コード: 全て選択

Print a'サンプル用

を、

コード: 全て選択

Print filename'サンプル用

に変えてください。

[たかせ]

ありがとうございました。

おかげさまで期待どおりできました。