我正在使用快速报告来创建标签,然后将其打印出来。但是我需要从代码向用户显示TfrxDesigner,以便他们可以拖动报表页面中的组件并调整其大小。
话虽如此,我需要锁定并隐藏所有菜单和工具栏,以便用户不使用它们。我不想显示或让用户使用图片上红色形状的菜单,还有数据树和所有工具栏,只有绿色菜单。
有人去过吗?任何帮助表示赞赏,谢谢!
您可以创建TfrxDesigner实例:
FDesigner := TfrxDesigner.Create(nil);
FDesigner.OnShow := DesignerShow;
使用像这样的OnShow处理程序:
procedure TFRHelper.DesignerShow(Sender: TObject);
begin
Assert(Sender is TfrxDesignerForm);
// Change the TfrxDesignerForm as you wish, e.g.:
TfrxDesignerForm(Sender).BorderIcons := TfrxDesignerForm(Sender).BorderIcons - [biMinimize];
TfrxDesignerForm(Sender).OnMouseWheel := DesignerFormMouseWheel;
end;