so auf die schnelle (ungetestet!!):
Rectangle1.OnBeforePrint :
function Rectangle1_(Self: TRaveRectangle);
begin
If DataView1Feld.AsInteger = 0 then
Self.FillColor := clWhite;
else
Self.FillColor := clSilver;
end if;
end;
(-> werde mal ausprobieren und in der dt. Rave-Doku aufnehmen)
thomas, TeamNevrona