frxPreview

NeKum

Delphi 7
FastReport Professional Edition version 3.03
Создаю главную форму. На нее кидаю TButton, TTable, TDataSource, TfrxDBDataset, TfrxReport - Form1.
Создаю динамическое окно с TfrxPreview, TToolButton и TfrxXLSExport - Form2

На Form1:
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2 := TForm2.Create(Application);
try
frxReport1.LoadFromFile('1.fr3');
frxReport1.Preview := Form2.frxPreview1;
frxReport1.ShowReport();
Form2.ShowModal;
frxReport1.Preview := Nil;
finally
Form2.Free;
end;
end;

На Form2:
procedure TForm2.ToolButton3Click(Sender: TObject);
begin
frxPreview1.Export(frxXLSExport1);
end;

Все нормально. Экспорт произошел.
Закрываем окно и открываем его снова. Все. Серый Preview и ничего более. Никакие танцы с бубном не заставят его показать отчет.
То же самое и при frxPreview1.Print;

-=Serg=-

написал:

frxReport1.LoadFromFile('1.fr3');

Попробуй указать полный путь к файлу.

NeKum

Ндаааа... Бывает...
Совсем разум потерял. Действительно, я же меняю текущий каталог.
Спасибо :-)