Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2003.08.21;
Скачать: [xml.tar.bz2];

Вниз

Создание отчёта   Найти похожие ветки 

 
URKSI   (2003-08-06 13:10) [0]

Люди, кто может , помогите советом: как в дельфах сделать отчёт типа Word"овского дока, т.е. при заполнении полей редактирования создавался отчёт в виде готового договора(прога по договорам) на таком же как и на Word"овском листке.Очень прошу помочь, а то мне крышка...


 
laider   (2003-08-06 13:30) [1]

С помощью Ворда :-)
делаем вордовский файл, такой как должен выглядеть отчет... Вместо данных которые должны вставлятся програмно пишем какой-нить текст-метку типа #НОМЕР_ДОГОВОРА#
Делаем процедуру:

procedure MakeReport;
var MsWord: Variant;
begin
//создаем оле-объект
MsWord := CreateOleObject("Word.Basic");
//создаем новый файл по шаблону report.doc
MsWord.Filenew(Template:="c:\report.doc",NewTemplate:=0);
//фоновая печать
MsWord.ToolsOptionsPrint(Background:=0);
//ищем в шаблоне текст "#НОМЕР_ДОГОВОРА#"
MsWord.EditFind("#НОМЕР_ДОГОВОРА#");
//вставляем вместо найденного текст "№ 235-32/23"
MsWord.Insert("№ 235-32/23");
//сохраняем
MsWord.FileSaveAs("C:\MyReport.doc");
//печатаем 1 экземпляр
MsWord.FilePrint(NumCopies:="1");
end;


 
URKSI   (2003-08-06 13:35) [2]

и это всё????(8-)
спасибо огромное!!!


 
SPIRIT   (2003-08-06 13:35) [3]

Используй какой-нибудь генератор отчетов их полно всяких
от RaveReports котроый с Delphi сразу идет... также QuickReports,
очень хороший FastReport... я лично в нем делаю.. всего за два дня въехал : Вот действия для создания элементраного отчета:

1. Закидываешь на форму компоненты TFrReport и TFrDbDataSet(в ее свойствах указываешь источник данных) .
2. Двойным нажатием на FrReport открываешь дизайнер.
3. Формируешь отчет (пишешь текст, добавляешь бенды-источник данных:TFrDbDataSet )
в проекте:

FrReport1.LoadFromFile("FR_end.frf");
FrReport1.ShowReport;


а прежде его надо скачать здесь:
www.fastreport.ru
документация на русском
http://www.vibe.ru/files/free/fre232ru.zip

хотя предложенный ранее способ быстрее для написания, зато в здесь не надо ничего кроме твоего эксешника и фрф файла... распечатать тоже можно.. никакого гемора с офисом... выбирать тебе


 
URKSI   (2003-08-06 13:48) [4]

не могу зайти на www.fastreport.ru ...по чему-то


 
laider   (2003-08-06 13:57) [5]

В действительности в приведенном мной примере многое опущено... Можно открывать ворд со сформированным отчетом, можно вставлять картинки или например кусок екселевского файла и т.п. т.е делать все что позволяет ворд. Но требование программы в таком случае - обязательное наличие ворда на компьютере :-) Вордовские отчеты можно сделать очень универсальными, с возможностью быстрой правки вордовского шаблона без в мешательства программера... Данные из программы можно вываливать вообще все какие вздумается а в шаблоне расставлять метки только для необходимых... Шаблоны можно делать в любом виде, вставлять в них таблицы и т.п. Вобщем для пользователя - неограниченное поле для деятельности :-)Кстати с ворд97 не пробовал, но должно работать...

А для тех кто не любит Ворд :-) есть еще возможность делать отчеты через хтмл, опять же по шаблону только уже без использования оле объектов и т.п.



Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2003.08.21;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.008 c
1-68383
Son!K
2003-08-07 17:26
2003.08.21
Файлы в консольном приложении


1-68309
Ткаченко Сергей
2003-08-06 14:23
2003.08.21
Поиск файлов в директории


1-68390
Silver_
2003-08-05 13:07
2003.08.21
Как


1-68349
Tiny
2003-08-07 10:38
2003.08.21
DLL , MDI и TAction


14-68445
TButton
2003-07-08 18:47
2003.08.21
beta Тестирование





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский