如何以编程方式调用 DialogPage Cancel Button 事件

【问题标题】：How to programmatically call the DialogPage Cancel Button event如何以编程方式调用 DialogPage Cancel Button 事件
【发布时间】：2020-03-02 08:34:35
【问题描述】：

使用 Fast Report VCL 组件。

在报告中，我会根据某些标准自动取消报告生成。

我正在使用快速报告对话框页面并放入 2 个按钮（Btn OK 和 Btn Cancel）

当用户按下 Ok Event（生成）和 Btn Cancel（取消生成报告）时，报告工作正常。

我想要实现的是通过脚本以编程方式调用取消按钮来取消报告生成。

如何做到这一点？

IF <condition> then
    BtnCancel.click();

【问题讨论】：

标签： delphi-7 vcl fastreport

【解决方案1】：

试试

if <condition> then
  DialogPage1.ModalResult := mrCancel;

【讨论】：

当我将此代码放在按钮“onclick”事件中并且当我使用鼠标单击按钮时，此方法有效。但是，如果我把它放在 DialogPage1."OnShow" 或 DialogPage1."Onactivate" 事件中，它就不起作用。这个想法是用 Dialogpage1 modal result = mrCancel; 关闭 DialogPage1
procedure frxReport1OnRunDialogs(var Result: Boolean); begin if <condition> then begin Result := False; Engine.StopReport; end; end;
谢谢。如果那么 Engine.StopReport;成功了。