为什么不可以利用Canvas在fastreport的memo上画线？（在线）

编写这样一个函数，先在fastreport的memo上画线，为什么在现在报表前出现一条斜线，而等报表显示完成以后斜线就不存在了？
procedure TForm1.drawLine(FrReport:TfrReport;Memo: string);
begin
  Canvas.FillRect(ClientRect);
  Canvas.MoveTo(frReport.FindObject(memo).x,frReport.FindObject(memo).y);
  Canvas.LineTo(frReport.FindObject(memo).x+frReport.FindObject(memo).dx,
                frReport.FindObject(memo).y+frReport.FindObject(memo).dy);
end;