uses ppDesignToolManagerTBX, ppDesignToolbarsTBX;procedure TForm2.ppDesigner1Show(Sender: TObject);var lDesignToolManager: TppDesignToolManager;begin lDesignToolManager := ppDesigner1.Form.LayoutManager.ToolManager; //Hide Menu Option lDesignToolManager.Menubar.FileMenu.Open.Visible := False; //Hide Toolbar option TppStandardToolbar(lDesignToolManager.Toolbars.ItemsByName['Standard']).FileOpenButton.Visible := False;end;
Comments
The best way to prevent a user from loading a new report in the designer is to hide the menu and toolbar options.
Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com