EmbedDesigner and open report

Hello,

when I open a report on EmbedDesigner demo, I can't see anywhere the file name I'm working on it, and when I try save it I need to know what is the file name again.
How I do that:

1-Show opened report on the caption
2-Save file name on save dialog box

Thanks

Comments

  • gpigpi
    edited 3:00PM
    Use for Open command
    procedure TForm1.FormShow(Sender: TObject);
    var
      Designer: TfrxDesignerForm;
    begin
      ........
      NewDialogMI.Action := Designer.NewDialogCmd;
      //OpenMI.Action := Designer.OpenCmd;
      SaveMI.Action := Designer.SaveCmd;
      ...........
    procedure TForm1.OpenMIClick(Sender: TObject);
    begin
      TfrxDesignerForm(frxReport1.Designer).OpenCmdExecute(nil);
      Caption := frxReport1.FileName;
    end;
    
    Same for Save command
  • edited 3:00PM
    This works for the menu Open command; how do I generate this behavior for the Open button that is on the designer itself?
    gpi wrote: »
    Use for Open command
    procedure TForm1.FormShow(Sender: TObject);
    var
      Designer: TfrxDesignerForm;
    begin
      ........
      NewDialogMI.Action := Designer.NewDialogCmd;
      //OpenMI.Action := Designer.OpenCmd;
      SaveMI.Action := Designer.SaveCmd;
      ...........
    procedure TForm1.OpenMIClick(Sender: TObject);
    begin
      TfrxDesignerForm(frxReport1.Designer).OpenCmdExecute(nil);
      Caption := frxReport1.FileName;
    end;
    
    Same for Save command

Leave a Comment