禁止Fastreport预览时最小化,导致用户无法打开程序的页面

只需在OnPreview事件处理程序中写入

禁止Fastreport预览时最小化,导致用户无法打开程序的页面_第1张图片

procedure TForm1.frxReport1Preview(Sender: TObject);
begin
    if Assigned(frxReport1.PreviewForm) then
      frxReport1.PreviewForm.BorderIcons := [TBorderIcon.biSystemMenu, TBorderIcon.biMaximize]
end;

你可能感兴趣的:(#,Delphi控件,笔记)