可以在设计时将query打开,选择正确的datefield后在将query关闭,待到程序执行时再打开。
解决方案 »
- 怎样在nmudp中将网络通信的数据包写入并发送给B?
- C#中使用DELPHI开发的DLL库,传string值时,只能传11位,请大师们指教!!急!!
- delphi编译的执行文件使用了那些BPL
- 为什么用createoleobject命令总显示出错?
- 怎样从ImageList中取出一个位图,并把它赋给一个Image控件?
- 怎样连接网址,比如,连接到www.csdn.net?---delphi函数。在线等。。。
- 如何在接口中定义function?
- 这个问题已经想了很久了:如何控制当第一条记录没有更新,第二条,第三条等所有记录就不能更新!
- 如何编程使在桌面任意地方双击都在该地方弹出开始菜单?
- 哪位大哥帮忙把这段CB的函数译成Delphi?两百分!
- 老千,偶好久没给分,偶的后台也倒了,不过,偶还能赖来一些分
- 学delphi的再过两年还有用么
QRDBText.datafield:='Filed';
注:这个时候Query已经打开了
procedure TMapart1.PreviewClick(Sender: TObject);
begin
with TMPART_Print.Create(self) do
try
QRDBText1.DataField:='Field';
QRep.Preview;
finally
free;
end;
end;
你的 TMPART_Print.Create(self)为什么要这样呢?
没有必要加这些吧。
TMPART_Print.Create(self)是因为原来是一个普通的动态生成的窗体来的,
在QRDBText中直接打字(字段名)进去也可以。
在QRDBText的datefield中直接打字(字段名)进去也可以。