typhon (lazarus) 下文件拖放操作

本来是个简单的问题，百度了一下没有正确答案。我就在这里写下 方法1： procedure TForm1.FormCreate(Sender: TObject); begin   self.AllowDropFiles:= true; end;      方法2：       上面根据喜好，自选或全选都可（其实就是一回事）。 关键代码例子：处理OnDropFiles事件   procedure TF

>>阅读原文<<