代码是这样的(原理) 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次肯定死机。是不是数据 操作太多了。