ReportMachine 自定义代码 画细线

procedure Memo3_OnBeforePrint(Sender: TObject); begin Memo3.Text := inttostr(Footer1.Top); Memo4.Text := inttostr(MasterData1.datasetName); Diagonal1.height :=(15-strtoint(MasterData1.datasetName
相关文章
相关标签/搜索