高手帮我看看!关于DragDrop!!! 我写了一个例子(有源码),谁能帮我调试一下!可以拖拽,但无法激活form,所以 无法处理drop事件!!! (源码)http://bbs.2ccc.com/attachments/0iron0_2005117151749.rar 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 ... private { Private declarations } procedure DropURL(Sender: TObject);...procedure TForm1.FormCreate(Sender: TObject);begin URLDropTarget1:=TURLDropTarget.Create(self); URLDropTarget1.OnDrop := DropURL;end;procedure TForm1.DropURL(Sender: TObject);begin SetForeGroundWindow(Handle); ShowMessage(URLDropTarget1.URL);end; 怎么让MDI子窗体一开始就消失啊? 请各位大侠帮忙:可能是数据库的死锁问题,急!谢谢!! 关于打包路径的问题 求一Delphi7打包工具 向adoqury动态添加查询字段后,在清除adoquery的sql内容后,查询字段会自动清除吗? sql server2000数据库转换成pardox7.0 关于Query的问题 寻求解决方案和报价! 帮忙!很急! 兄弟姐妹,江湖救急!!!!!!!!!!有帮助的送分50-150!!!!!!!! ADO连接MYSQL的问题。 这样的管理程序应该怎么做。
private
{ Private declarations }
procedure DropURL(Sender: TObject);
...
procedure TForm1.FormCreate(Sender: TObject);
begin
URLDropTarget1:=TURLDropTarget.Create(self);
URLDropTarget1.OnDrop := DropURL;
end;procedure TForm1.DropURL(Sender: TObject);
begin
SetForeGroundWindow(Handle);
ShowMessage(URLDropTarget1.URL);
end;