盒子论坛 v2.1

代码是这样的（原理）
form_print.but_printclick(sender:tobject);
var
  qry_print:tquery;
begin
.
.
.
.

  qry_print:=tquery.create(self);
  with datamodel.query1 do
  begin
    close;
    sql.clear;
    sql.add('select * into temp1 from db where ...');
    execsql;
  end;
qrdbtext1.dataset:=qry_print;
qrdbtext1.datafield:=';
.
.
.
.
qrdbtext5.dataset:=qry_print;
qrdbtext5.datafield:=';
with qry do
begin
  close;
  sql.clear;
  sql.add('select * from temp1 order by...');
  open;
end;
qr1.print;
end.
程序中还多次使用了临时表。打印一两次没问题，上了5次肯定死机。是不是数据
操作太多了。

----------------------------------------------
不爱我-就别靠近我。

作者：

hedong (hedong)	★☆☆☆☆	-
	盒子活跃会员

2003/8/14 13:00:18

4楼：

还是不明白。
你所有的qrdbtext.datafield:=';

在报表上应该不会有数据呀。
----------------------------------------------
-

作者：

s_orry (1岁)	★☆☆☆☆	-
	盒子活跃会员

2003/8/14 18:43:06

5楼：

qrdbtext.datafield:=';就是把Tqydbtext的datafield属性设置为数据库中的字段名呀！我是把字段名给省略了。(抱歉，抱歉)
也就是qrdbtext.datafield:='fieldname';
----------------------------------------------
不爱我-就别靠近我。

信息

登陆以后才能回复