delphi - delphi firemonkey2 でドロップされたフォルダのファイル パスを取得する方法

Question

こんにちは、タイトルにあるように、使用するコードと、パネルまたはメインフォームにファイルをドラッグすると、そのフォルダーのファイルパスが表示されるようにプログラムをセットアップする方法を知りたい.

助けてください。

Answer 1

次のように簡単です。

• TDropTarget コンポーネントをメイン フォームに配置します。
• Filter プロパティを設定します。の代わりに * を付けます。ファイルだけでなくフォルダも受け入れるようにしたい場合。
• OnDropped イベントでは、完全修飾ファイルまたはフォルダー名のリストが Data.Files にあります。そこから必要なものをすべて手に入れることができるはずです。

これはあなたが達成しようとしていることですか、それとも何か他のことを考えていますか?

アップデート：

リクエストにより、ドロップされた最初のファイルの名前を示す例を追加しました。

procedure TForm1.DropTarget1Dropped(Sender: TObject; const Data: TDragObject;
  const Point: TPointF);
begin
  ShowMessage(Data.Files[0]);
end;