當我在TfrPage->Columns設=2時，第一頁左、右分欄打印正常，從第二頁開始移位，第二頁應在左側打印到右側。第三頁超出邊界打印白紙 請教怎样修改原碼或哪個板本沒問題 (FastReport2.50/2.51分欄打印從從第二頁開始移位) 發表人 - hjandy 於 2004/03/29 11:41:31

這是 FR 2.5 的 Bug , 改用 2.51 就沒有問題了, 或者你可以參考以下的 程式修改    

procedure TfrPage.DrawPageFooters; 
begin 
  CurColumn := 0; 
  XAdjust := LeftMargin; 
  if (PageNo <> 0) or ((Bands[btPageFooter].Flags and flBandOnFirstPage) <> 0) then 
    while PageNo < MasterReport.EMFPages.Count do 
    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; 
end;