以编程方式设置dxComponentPrinter1Link1 ReportTitleText

Question

我正在努力以编程方式在代码中设置报告标题。我可以在设计师中手动完成，但如果我可以在代码中执行此操作，那么这不是我想要做的事情。

情况是这样的：我有2个cx网格。第一个显示各个部门，而另一个显示链接到第一个网格中选定部门的所有联系人（afterscroll事件）

我正在打印显示联系人的第二个网格的内容。但是，我希望报告标题是第一个网格中部门的名称。

这样的事情：

dxComponentPrinter1Link1.ReportTitleText :=Mytable.FieldByName('department').asString;

但我无法弄清楚在哪里写这个代码（假设它是正确的）。或者其他任何方式？

Answer 1

终于明白了：

procedure TForm5.dxComponentPrinter1BeforePreview(Sender: TObject;
  AReportLink: TBasedxReportLink);
begin
dxComponentPrinter1Link1.ReportTitle.Text := DataModule2.MyTable.FieldByName('department').asstring;
end;