解决了
FR2.5 Can't Print Multi-Colum Report correctly?(18 Jun 2003 06am:30:23)
I Try it with fr demo in fr2.5,the first page is ok,but from second page,it can
not print correctly? but in fr2.4,it can print correctly.
没人理睬,自己解决了
procedure TfrPage.DrawPageFooters;
//var
// sadj : integer;
begin
CurColumn := 0;
// sadj:=XAdjust;
XAdjust := LeftMargin;
if (PageNo <> 0) or ((Bands[btPageFooter].Flags and flBandOnFirstPage) <> 0) then
while PageNo < MasterReport.EMFPages.Countdo
begin
if not (Append and WasPF) then
begin
if (CurReport <> nil) and Assigned(CurReport.FOnEndPage) then
CurReport.FOnEndPage(PageNo);
if (MasterReport <> CurReport) and (MasterReport <> nil) and
Assigned(MasterReport.FOnEndPage) then
MasterReport.FOnEndPage(PageNo);
ShowBand(Bands[btPageFooter]);
end;
Inc(PageNo);
end;
PageNo := MasterReport.EMFPages.Count;
// XAdjust:=sadj;
end;