请问动态创建ado组件问题?

dahuzhi 2005-04-23 10:56:04
要动态创建ado的组件,TADOQuery.Create()中间里面带什么参数呀?
...全文
84 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
xqls 2005-05-06
  • 打赏
  • 举报
回复
to: duanhai(段海)
AdoQuery2 := TAdoQuery.Create(nil);用在独立unit,没有窗体存在.
duanhai 2005-05-06
  • 打赏
  • 举报
回复
procedure TForm1.FormCreate(Sender: TObject);
var
AdoQuery2: TAdoQuery;
begin
AdoQuery2 := TAdoQuery.Create(Self);
//只里的Self指的是窗体,当指定为Self时,就算AdoQuery2后面没有Free,
//窗体也会将它释放掉,而如果为AdoQuery2 := TAdoQuery.Create(nil);
//那么就必须自己释放,否则会引发内存泄漏
try

finally
AdoQuery2.Free;
AdoQuery2 := nil;
end;
end;
suihu 2005-05-06
  • 打赏
  • 举报
回复
ADOQuery1:=TADOQuery.Create(Nil);
xqls 2005-05-06
  • 打赏
  • 举报
回复
ADOQuery1 :=TADOQuery.Create(nil);

16,748

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧