![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ОТЧЁТЫ !!! Скоро будут гореть
ali_tash © (2005-02-26 22:15:00)Здравсвуйте
в скором времени мне придётся писать часть программы которая
отвечает за формирование отчётов.
так как отчётов более 100 ,то хотелось бы узнать как оптимальнее начать работу над этой задачей, чтоб на пол пути не пришлось всё переделовать.
Отчёты нужно выводить только в Word или Excel(не исползовать Rave и прочие) ,база InterBase
Подскажите какой нибуть генератор отчётов
либо ссылки по этой теме.
Буду благодарен за любую информацию
Alex-- (2005-02-28 02:54:00) [1]И в строну FastReport можно посмотреть. Быстрота создания, генерации отчетов. Возможность правки пользователем форм. Любая сложность, внутренний (паскале подобный) скрипт.
Экспорт в Excel(XML), Excel(OLE) и др. И не дорого.
Sergey_Masloff (2005-02-27 22:19:00) [2]vertal © (26.02.05 22:46) [2]
>Если эти самые Word или Excel доступны
...
>Хотя по оптимальности это решение не котируется - ни по >используемой памяти, ни по скорости.
Ну если данные в Excel вставлять обращаясь к Cells(x,y) то конечно... Если же работать ренджами засовывая заранее сформированные массивы - никаких проблем со скоростью. Принтер гораздо медленнее печатает.
YurikGL (2005-02-27 20:21:00) [3]
> GanibalLector © (27.02.05 16:28) [16]
Сохраняешь из ворда нужный файл в формате xml, а потом смотришь из блокнота, например, как он внутри устроен.
GanibalLector (2005-02-27 16:28:00) [4]2 YurikGL © (27.02.05 08:21) [4]
Я конечно все понимаю,но не на английском :(
З.Ы. И когда ж я заставлю себя его выучить?
Набережных С. (2005-02-27 15:00:00) [5]Ну я ж говорю: справка - дело вкуса:) А критиковать по делу - это ж надо читать вдумчиво, а лень куда девать?:)
YurikGL (2005-02-27 13:44:00) [6]
> YurikGL © (27.02.05 13:44) [13]
YurikGL(#-#)newmail.ru
YurikGL (2005-02-27 13:44:00) [7]
> Набережных С. © (27.02.05 12:21) [10]
Если можно - скинь наиболее критичные вещи. Я давно собирался эту статью переписывать.
А по поводу справки VB, за все это время не использовал ее ни разу. Записи макроса, обычно, хватает...
atruhin (2005-02-27 12:52:00) [8]Простой пример:
procedure TfrmDateReport.FindReport;
var
sr: TSearchRec;
FileAttrs: Integer;
i : word;
begin
FileAttrs := 0;
if FindFirst('*.xls', FileAttrs, sr) = 0 then begin
repeat
for i:=1 to length(sr.Name) do
if sr.Name[i]='.' then break;
if sr.Name[i]='.' then dec(i);
edReportName.Items.Add(Copy(sr.Name,1,i));
until FindNext(sr) <> 0;
FindClose(sr);
end;
end;
procedure TfrmDateReport.xlRepBeforeBuild(Report: TxlReportG2);
var
S : string;
i : word;
IWorksheet : IxlWorksheet;
begin
with xlRep do begin
IWorksheet := IWorkbook.Worksheets.Item['Лист2'] as IxlWorksheet;
IWorksheet.Range['SQLDTBegin', EmptyParam].Value :=
DateTime2SQL(DateOf(edDateBegin.Date)+TimeOf(edTimeBegin.Time));
IWorksheet.Range['SQLDTEnd', EmptyParam].Value :=
DateTime2SQL(DateOf(edDateEnd.Date)+TimeOf(edTimeEnd.Time));
i:=1;
repeat
S := IWorksheet.Range['B'+inttostr(i), EmptyParam].Value;
if S <> '' then begin
try
Form1.unSQLCon.ExecSQL(S);
except
IWorksheet.Range['SQLError', EmptyParam].Value := 'error in SQL - '+s;
break;
end;
end;
inc(i);
until S = '';
tbLog.Close;
tbLog.Open;
end;
end;
А в листе Excel примерно так(простейший отчет):
create temp table reptbl (i1 varchar ,i2 float, i3 varchar)
insert into reptbl select compip, sum(summa), sum(trafic) from log where DATETIME>'SQLDTBegin' and DATETIME<'SQLDTEnd' group by compip
но это сделано для SQLite где есть поддержка временных таблиц, для Firebird нужно немного поменять алгоритм, а вообще в XlReport более 100 страниц документации на русском языке.
Fin (2005-02-27 12:24:00) [9]
> ali_tash (27.02.05 12:16) [9]
http://www.afalinasoft.com/
Набережных С. (2005-02-27 12:21:00) [10]
> YurikGL © (27.02.05 11:45) [7]
Ты меня тоже извини, погорячился:( Надо было письмом, а не сюда...Извини.
ali_tash (2005-02-27 12:16:00) [11]atruhin
можеш пример привести
и откуда можно скачать xlReport ?
atruhin (2005-02-27 11:56:00) [12]xlReport - очень много возможностей. Я делал вариант хранения SQL запросов на свободной странице Excel, получается одна процедура выбора отчета (все они хранятся в заданной директории), и одна процедура загрузки любого отчета, все отчеты делаются непосредственно в Excel (т.е. создаешь SQL выражения для получения данных, xlReport автоматически помещает эти данные в нужные ячейки).
YurikGL (2005-02-27 11:45:00) [13]
> Набережных С. © (27.02.05 09:53) [5]
Там еще косяки есть... исправить то, конечно, надо...
Anatoly Podgoretsky (2005-02-27 11:13:00) [14]А на что они еще пригодны, это же не рукописи, если у тебя нет печки, то отдай в отдаленные районы, у них с теплом проблемы.
Набережных С. (2005-02-27 09:53:00) [15]
> YurikGL © (27.02.05 08:21) [4]
> http://www.delphimaster.ru/articles/dbtoword/index.html
"Во Word-e", между прочим, есть еще и функция проверки правописания, ага. Глаз режет. И к двум способам "добывать информацию об интерфейсе ворда" недурно было-бы упомянуть и третий, самый логичный - встроенная справка по VBA, но это уже дело вкуса.
YurikGL (2005-02-27 08:21:00) [16]
> Некоторые советуют XML.Я пока не догнал,что это..
http://www.microsoft.com/office/xml/default.mspx
http://www.microsoft.com/downloads/details.aspx?FamilyId=FE118952-3547-420A-A412-00A2662442D9&displaylang=en
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnexcl2k2/html/odc_xmlss.asp
Суть в том, что генерируешь файл *.xml а потом его открываешь вордом или екселем.
А еще http://www.delphimaster.ru/articles/dbtoword/index.html
GanibalLector (2005-02-27 01:47:00) [17]я использую позднее связывание(OLE).НравиЦа ;)
З.Ы. Некоторые советуют XML.Я пока не догнал,что это...Но понял,что это лучший вариант из всех существующий.
vertal (2005-02-26 22:46:00) [18]> Отчёты нужно выводить только в Word или Excel
Если эти самые Word или Excel доступны, то можно их и использовать через OLE-автоматизацию. Гарантировано получение файла с правильным их родным форматом. Хотя по оптимальности это решение не котируется - ни по используемой памяти, ни по скорости.
Fin (2005-02-26 22:21:00) [19]Я пользуюсь xlReport для Excel, быстро, удобно, мне нравиться.