realbasic - 外部ファイルを xojo アプリにドラッグ アンド ドロップしてパスを返すにはどうすればよいですか

Question

ファイル（abc.txtなど）をxojoプログラムにドラッグし、ドロップしたファイルのパスを書き出させて、C:\\mydata\abc.txt.

どうすればそれを行うことができますか？一部のプロパティを有効にする必要がありますか?

マニュアルやフォーラムから有用なものが見つかりません。

Answer 1

まず、ファイル タイプ セットをプロジェクトに追加します。最初は FileTypes1 という名前になりますが、「DropTypes」に名前を変更することをお勧めします。受け入れるファイルの種類を追加します。任意のファイルを受け入れるには、IDE のファイル タイプ セット エディタでこれらのボタンの中央をクリックします。

special/anyを選択します。

Open次に、ドロップを許可するコントロールまたはウィンドウのイベントに次の行を追加します。

me.AcceptFileDrop DropTypes.All

DropObject次に、このコードをコントロールまたはウィンドウのイベントに追加します。

if obj.FolderItemAvailable then
  dim f as FolderItem = obj.FolderItem
  ' Now you have the file reference in f.

  ' Get the path:
  dim path as String = f.NativePath ' (in older RB versions, use *f.AbsolutePath* instead)

  ' Show the path:
  MsgBox path
end