DbGridEh的打印问题(50分)

C

coolong

Unregistered / Unconfirmed
GUEST, unregistred user!
DBGRIDEH里面有随便几个列,
怎么样在打印DBGRID的时候加上第一个序列打印行号号码
并且,每一次换行的时候重新算行号。
还有就是怎么解决自动补齐空行的问题。
请问怎么解决。
 
1.设计算字段,用PrintDBGridEh1打印
或用quick rep作报表
private
{ Private declarations }
iccount:integer;
procedure TRF_ListReport.QuickRep1BeforePrint(Sender: TCustomQuickRep;
var PrintReport: Boolean);
begin
iccount:=1;
end;

procedure TRF_ListReport.QREcountPrint(sender: TObject;
var Value: String);
begin
value:=inttostr(iccount);
inc(iccount);
end;
 
因为我要用到多重表头,所以用EH控件了。
EH里面要怎么做啊,PRINTDBGRIDEH的控件里面的事件很少。
 
PrintDBGridEh1BeforePrint(Sender: TObject);
看一下demo
 
Demo里面没有这方面的演示!
 
找一下资料
 
可以先把查询内容生成一个临时表,在临时表里加上记录号,再用DBGridEh的打印功能
select identity(int,1,1),a,b,c into #Tmp from Tables
select * From #tmp
 
你可以在dbgrideh 的第一列设置一个字段 id .visible := true
在打印之前放出来,在打印后,id.visible := false
id:={1.2.3.4.5.6.7........}
呵呵
不知道,好不好!!!
 
接受答案了.
 
顶部