我有个TQuery的对象, 在别的地方已经初始化好,有了查询结果了. 现在我想这么样用, 不知道delphi中这样可以不.1 在别的地方已经初始化好,有了查询结果了
qry1 := TQuery.Create(nil);
qry1.sql.add('select * from test');
qry1.open.2 我有这么一个类, 增加两个属性.
TQueryExt = class
private
FQry: TQuery;
FTimeout:integer;
public
construction Create(aQry:TQuery, aTdateTime:TdateTime);
destruction Destroy; override;
procedure add(...);
procedure get(...);
end;construction TQueryExt.Create(aQry:TQuery, aTdateTime:TdateTime);
begin
FQry := aQry;[/color]
FTimeout:= aTdateTime;
end;我用的地方
qryext := TQueryExt.Create([color=#FF0000]qry1,Now); 我这里可以直接这么样写吗. DELPHI指针在这里应该怎么写啊.
qry1 := TQuery.Create(nil);
qry1.sql.add('select * from test');
qry1.open.2 我有这么一个类, 增加两个属性.
TQueryExt = class
private
FQry: TQuery;
FTimeout:integer;
public
construction Create(aQry:TQuery, aTdateTime:TdateTime);
destruction Destroy; override;
procedure add(...);
procedure get(...);
end;construction TQueryExt.Create(aQry:TQuery, aTdateTime:TdateTime);
begin
FQry := aQry;[/color]
FTimeout:= aTdateTime;
end;我用的地方
qryext := TQueryExt.Create([color=#FF0000]qry1,Now); 我这里可以直接这么样写吗. DELPHI指针在这里应该怎么写啊.
解决方案 »
- IdTcpClient的WriteBuffer如何发送大于255字符?
- socket的奇怪现象...
- fastreport怎样填充纸上的空白
- StringGrid如何實現滾動條移動時相應的文本框也一起移動?(即如何實現StringGrid的滾動條移動事件)
- DBNavigator1.VisibleButtons——怎么在程序里增减显示的按钮!
- 如何去掉DBNavigator的删除提示?
- 关于Grid导出成Excel的问题,还望指教!
- 100分求解:各位常去的delphi论坛(我是菜鸟~很多问题想要问)
- 在c/s应用程序中,如何动态连接Informix数据库并屏蔽用户名和密码输入的对话框?
- 请各位大虾帮帮忙——DELPHI安装的问题
- delphi 如何取数据库表的主键?
- 问题一两句说不清,关于文本操作的
还不知道自己用了指针,delphi包装的好,
其它你用的对象、过程等都是指针。
http://blog.sina.com.cn/s/blog_59cb8a930100bwyt.html
不过你这样写你的类对象应该要保持完整性
所以最好还是Assign
这样你外边的free了你也不会报地址错