reportmachine 报表动态打印(100分)

大家好,请教 reportmachine 动态打印dbgrid/cgrid 代码.
因网上reportmachine 相关知识极少,请教各位大虾.

你说的问题不详细

用 reportmachine 组件动态打印 dbgrid 代码,请赐教。
用 fastreport 组件动态打印 dbgrid 代码,巳有。

应该是在 GetValue事件

procedure TDM.RMGridReport2GetValue(const ParName: String;
var ParValue: Variant);
begin

if CompareText(ParName, '频道') = 0 then
begin
if MainForm.TotalFrame.ComboBox1.Text = '' then
ParValue := '所有频道 '
else
ParValue := MainForm.TotalFrame.ComboBox1.Text + ' ';
end;

if CompareText(ParName, '经办人') = 0 then
begin
if MainForm.TotalFrame.ComboBox2.Text = '' then
ParValue := '所有人 '
else
ParValue := MainForm.TotalFrame.ComboBox2.Text + ' ';
end;

if CompareText(ParName, '日期') = 0 then
begin
ParValue := '(' + DateToStr(MainForm.TotalFrame.DateTimePicker1.Date) + ' 至 ' + DateToStr(MainForm.TotalFrame.DateTimePicker2.date) + ')' + ' ';

end;

end;

不是有一个打印屏幕控件的控件吗，指定给他就行了呀。