FR4 frxReportBeforePrint HighLighting

MarkoRav

Hello!

I attempted to highlight values, i do so...

procedure TIWUserSession.frxReportBeforePrint(Sender: TfrxReportComponent);
begin
if Sender.Name = 'MemoDataUpornost' then
begin

  if double(TfrxMemoView(Sender).Value) >= 147.0 then
  TfrxMemoView(Sender).Color := clRed
    else
  TfrxMemoView(Sender).Color := clGreen;

end;

But result is shifted for one row. So if value is 147 the next row is painted red, not the one with right conditions.
How to work around this?

I use FR4 embaded in Delphi XE5

gpi

use
if double(frxReport.Calc(TfrxMemoView(Sender).Text)) >= 147.0 then
instead of
if double(TfrxMemoView(Sender).Value) >= 147.0 then

Karen99

I have the same problem.

procedure TrepRankTTest.frxRankTTestBeforePrint(Sender: TfrxReportComponent);
begin
if sender.Name = 'dsPairedTTestGIBB' then
begin
if TFrxMemoView(sender).value) = 'HS' then
TFrxMemoView(sender).Font.Color := clred
else if TFrxMemoView(sender).value) = 'PS' then
TFrxMemoView(sender).Font.Color := clblue
else if TFrxMemoView(sender).value) = 'NS' then
TFrxMemoView(sender).Font.Color := clblack
else
TFrxMemoView(sender).Font.Color := clblack;
end;
end;

This only result in the following row being red or blue.

I tried the frxReport.Calc(TfrxMemoView(Sender).Text)) it also doesn't work.

I must add that the frxMemoView shows the value of a frxdbDataset.