改版后丢失的未解之迷:FastReport中对话框的ModalResult问题

Question

在FastReport中添加一对话框，在对话框页面上添加一Button和Edit，Button的MordalResult＝mrOK，在Button的OnClick事件中写脚本：begin
  if trim(Edit1.Text)='' then 
  begin
    MessageBox('缺少条件！','条件有误',mb_OK + mb_IconWarning);
    Button1.ModalResult:=mrNone;
    Exit;
  end;
end在trim(Edit1.Text)='' 的情况下，对话框关闭。虽然Button1.ModalResult:=mrNone已经执行，但对话框仍然关闭。还试过相反的情况，先设置Button1的ModalResult＝mrCancel，然后在脚本中条件不满足时设置为mrOk，这种情况下，Edit1.text不为空，需要按两次按钮，对话框才能关闭。
请问高手，如何解决这个问题：按下按钮后，如果Edit1.Text为空，则对话框不关闭。

Answer 1

不要在IDE設置 button 的 ModalResult 直接begin
  if trim(Edit1.Text)='' then 
  begin
    MessageBox('缺少条件！','条件有误',mb_OK + mb_IconWarning);
    Exit;
  end;
  ...
  self.ModalResult:=mrOk;end

Answer 2

To： aiirii(ari-爱的眼睛) 
试过了，不行

Answer 3

如果你一定要在FR中实现的话，好好看一下FR的源码，肯定要改源码才行。