FastReport Cross-Tab 数据集不变化问题

Elinx 2013-05-22 04:42:37

procedure DBCross1Cell0OnAfterData(Sender: TfrxComponent);
var
Memo: TfrxMemoView;
begin
//Avg Alarm
Memo := TfrxMemoView(Sender);//if the AlarmInfo field of frxDBSet is 'Alarm', paint the cell as Red Color
if <frxDBDataset1."Information"> = 'Alarm'then
Memo.color := clRed;
end;

我用Cross-tab在单元cell写入数据时,的这个判断都不起作用,跟踪调试后发现,frxDBDataset1."Information"显示的内容都是数据库中的最后一条数据,可是我用DataBand做实验也是这个事件的话,frxDBDataset1."Information"是会改变的,请问这个该怎么用啊,这里的frxDBDataset1."Information"为什么不变化呢,永远是数据集的最后一条数据???
...全文
169 5 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
Elinx 2013-06-17
  • 打赏
  • 举报
回复
不浪费分。。。。
随行的太阳 2013-05-23
  • 打赏
  • 举报
回复
全网第一家 FastReport.v4.8.36 for.Delphi.BCB.Full.Source 最新版 CURRENT VERSION Build: 4.8.36 Date: 11/22/09 http://fast-report.com/en/products/report-for-delphi-fastreport-4-feature-matrix.html FastReport Studio 4.8 released! + added ability to split big bands(biggest than page height) by default + added ability to use keeping(KeepTogether/KeepChild/KeepHeader) in multi-column report + added BDE engine + added DBX engine + added confirmation reading for TfrxMailExport + added new enumerations drDontEditReportScript and drDontEditInternalDatasets to TfrxDesignerRestriction + added new TfrxDesignerRestriction: drDontEditReportScript and drDontEditInternalDatasets + added PrnOutFileName property to printer options + added RTF 4.1 support for TfrxRichText object + added TfrxDesigner.MemoParentFont property + added TfrxGroupHeader.ShowChildIfDrillDown property + added TfrxPrintOptions.PrnOutFileName property to set ability to print to file + added TfrxReportOptions.HiddenPassword property to set password silently from code + added TimeOut field to TfrxMailExport form + added checksum calculating for 2 5 interleaved barcode * changed PDF export: added full unicode support, improved performance, decreased memory requirements - changed inheritance mechanism, correct inherits of linked objects (fixups) - fixed "Page" and "Line" variables inside vertical bands - fixed ActiveForm ActiveX object - fixed bug in multi-column page when band overlap stretched PageHeader - fixed bug when cross tab cut the text in corner, when corner height greater than column height - fixed bug when designer place function in commented text block - fixed bug when designer shows commented functions in object inspector - fixed bug when engine delete first space from text in split Memo - fixed bug when Engine try to split non-stretcheable view and gone to endless loop - fixed bug when group doesn't fit on the whole page - fixed bug with displacement of subreport when use PrintOnParent property in s

5,927

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧