做了一个类似银行一样的存取系统,,现在最大的问题,,在于打印存折的问题,
我现在的想法是,在数据库中用个字段来标识是否有打印过..,
在打印的时候,就用这个字段来为依据确定此条记录是否要打印,想法应该是没问题的.
但现在实现不了.
我现在这样做就是在beforeprint中.确定那个字段的值,如.
if Adoquery1.FieldByName('lPrinted').AsBoolean then
begin
Qrexpr1.Enabled:=true;
Qrexpr2.Enabled:=true;
Qrexpr3.Enabled:=true;
Qrexpr4.Enabled:=true;
Qrexpr5.Enabled:=true;
end
else
begin
Qrexpr1.Enabled:=false;
Qrexpr2.Enabled:=false;
Qrexpr3.Enabled:=false;
Qrexpr4.Enabled:=false;
Qrexpr5.Enabled:=false;
end;
但是这样写后,如果有一行是打印过的话,,所有的记录都是空的..
麻烦各位多多指教...
我现在的想法是,在数据库中用个字段来标识是否有打印过..,
在打印的时候,就用这个字段来为依据确定此条记录是否要打印,想法应该是没问题的.
但现在实现不了.
我现在这样做就是在beforeprint中.确定那个字段的值,如.
if Adoquery1.FieldByName('lPrinted').AsBoolean then
begin
Qrexpr1.Enabled:=true;
Qrexpr2.Enabled:=true;
Qrexpr3.Enabled:=true;
Qrexpr4.Enabled:=true;
Qrexpr5.Enabled:=true;
end
else
begin
Qrexpr1.Enabled:=false;
Qrexpr2.Enabled:=false;
Qrexpr3.Enabled:=false;
Qrexpr4.Enabled:=false;
Qrexpr5.Enabled:=false;
end;
但是这样写后,如果有一行是打印过的话,,所有的记录都是空的..
麻烦各位多多指教...
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货