Экспорт в Pdf

gashik · August 2011

Никак не получаеться разобраться с экспортом

    IBDatabase1.Connected:=False;
    IBDatabase1.DatabaseName:='D:\database\quote.gdb';
    IBDatabase1.Params.Add('user_name=SYSDBA');
    IBDatabase1.Params.Add('password=masterkey');
    IBDatabase1.Connected:=True;
    IBQuery1.SQL.Clear;
    IBQuery1.SQL.Add('select * from m1_quote');
    IBQuery1.Close;
    IBQuery1.Open;
    IBTransaction1.Active:=True;
    frxDBDataset1.DataSet.Open;
    frxReport1.ShowReport;

    frxReport1.FileName := 'C:\database\1.xls';
    frxReport1.LoadFromFile('C:\database\m1_report.fr3', false);
    if  frxReport1.PrepareReport then frxReport1.Export( frxPDFExport1);

ShowReport - нормально показывает отчет, а вот экспортируемый файл пустой. Да и пожалуйста подскажите, как отключить все визуальные эффекты, т.е. сделали выборку - экспортировали в файл.

gashik · August 2011

Разобрался

    frxDBDataset1.DataSet.Open;
    frxPDFExport1.FileName:='D:\database\111.pdf';
    frxReport1.PrepareReport(true);
    frxReport1.Export(frxPDFExport1);

и делов). Теперь будем мучить многопоточность.

Скажите, ни у кого случайно нет примера сохранения отчетов с использованием IBQuery в нескольких потоках?

Экспорт в Pdf

Комментарии

Оставить комментарий