frPrintGrid & MDI

Vascom

Уважаемые, All.
Подскажите, пожалуйста, как можно заставить компонент frPrintGrid покзавывать отчет в MDI Child окне. Все отчеты в проекте MDI и не хотелось бы модально показывать отчет печати DBGrid.

-=Serg=-

Возможно нужно подправить исходники:
в модуле FR_PTabl:

стр 890:
...
procedure TfrCustomPrintDataSet.ShowReport;
var
r: TfrCompositeReport;
begin
r:=TfrCompositeReport.Create(nil);
r.PreviewButtons := FPreviewButtons;
r.DoublePass := FDoublePass;
r.MDIPreview := true;
...

Vascom

Сделал так...

procedure TfrCustomPrintDataSet.ShowReport(MDIWin:Boolean);
var
r: TfrCompositeReport;
begin
r:=TfrCompositeReport.Create(nil);
r.PreviewButtons := FPreviewButtons;
r.DoublePass := FDoublePass;
r.MDIPreview := MDIWin;
r.ModalPreview := not MDIWin;
...
Пакет перекомпилировался без проблем, но окно отчета моргает как MDIChild все вроде хорошо и тут же исчезает, даже буквы толком заметить невозможно
В чем может быть проблема не пойму...

-=Serg=-

Исчезает из-за r.Free; (в той же процедуре ниже)

Vascom

-=Serg=- Огромное спасибо за подсказку, все получилось

-=Serg=-

Вот только если ты закоментируешь r.Free, как бы не получилась утечка памяти....

Vascom

Не получится я ее не закоментировал, а поправил на такой код
if not MDIWin then r.Free;
Это в случае, если показывать отчет модально. А при формировании MDI Child окна, чтобы оно спряталось, а не свернулось его нужно разрушить Action:=caFree.
Соответственно, если окно просмотра отчета при нажатии на кнопку закрыть не сворачивается, значит разрушается, вот в принципе и все.
Если я в чем-то ошибаюсь буду очень признателен за поправку.