Форум: "Основная";
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];
Вниз
QuickReport: Сохранение отчета в файл (TXT,HTML,DOC,.....) Найти похожие ветки
← →
22606 (2002-02-08 11:07) [18]Как правильно написал Johnmen © (07.02.02 17:08)
дейстительно, dbf нужно создавать не по отчету, а по набору данных, с ним связанному (QReport.DataSet)
Самый простой (но не самый эффектный) способ загнать DataSet (связанный с отчетом) в dbf - это посредством TBatchMove
Вот процедурка для этого
procedure DatToDbf(const TableFileName : string; DaT : TDataSet);
var
Table : TTable;
BM : TBatchMove;
begin
Table := TTable.Create(nil);
try
Table.TableType := ttFoxPro;
Table.DatabaseName := ExtractFileDir(TableFileName);
Table.TableName := ExtractFileName(TableFileName);
BM := TBatchMove.Create(nil);
try
BM.Mode := batCopy;
BM.Source := (Dat as TBDEDataSet);
BM.Destination := Table;
BM.Transliterate := True;
BM.Execute;
finally
BM.Free;
end;
finally
Table.Free;
end;
end;
Опции BM можете изменить по своему вкусу
Для этого примера обязательно наличие на машине BDE.
Кодировка получившегося DBF будет зависеть от настройки BDE для DBF-файлов.
Что касается вопроса по QR и записи в разные форматы, то стандартные фильтры действительно очень кривые.
Я встречал очень простой и интересный способ сохранить отчет в DOC файл - это записать его как картинку, а потом вставить картинку в DOC. Но этот метод хорош только для того, чтобы передать документ кому-то или сохранить его для последующей печати, но не редактировать. Если Вас действительно устраивает найденный PsQRFilter (TPsQRExport), попробуйте найти на него ключик или еще проще купить :-) (если действительно проект того стоит).
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.004 c
