如何在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;