Как сделать программно изменения в отчете при открытии дизайнера

Ingword

Все отчеты храню в БД.
У меня есть функция импорта отчетов:

 if OpenDialog.Execute then
    begin
      frxReport.LoadFromFile(OpenDialog.FileName);
      FIsNewReport := True;
      frxReport.DesignReport();
    end;

Она нормально работает и открывает отчет в дизайнере.
Функции сохранения я переопределил(для записи в БД), хотелось бы что бы после открытия отчета в дизайнере он был помечен как Modified. И пользователю при закрытии дизайнера было предложено его сохранить.
Подскажите пожалуйста, как это сделать? И возможно ли вообще это сделать.

gpi

procedure TForm1.frxDesigner1Show(Sender: TObject);
begin
  TfrxDesignerForm(Sender).Modified := True;
end;

Ingword

gpi написал: »

procedure TForm1.frxDesigner1Show(Sender: TObject);
begin
  TfrxDesignerForm(Sender).Modified := True;
end;

Спасибо большое, все работает. Не додумался.