Экспорт таблицы из DBgrid в Word

zena · 02.11.2016, 11:35

Добрый день.
Имеется таблица в DBGrid. Её необходимо вставить в шаблон документа word.
Задача сразу показалась не сложная: в шаблоне документа прописываем "уникальные идентификаторы", которые просто заменяем нужными данными при экспорте:

Код:

vVarApp.OlePropertyGet("Selection") .OlePropertyGet("Find").OleProcedure("Execute",
/*FindText=*/ "d1", /*MatchCase=*/false, /*MatchWholeWord=*/ false,
/*MatchWildcards=*/false, /*MatchSoundsLike=*/false, /*MatchAllWordForms=*/false,
/*Forward=*/true, /*Wrap=*/1, /*Format=*/false, /*ReplaceWith =*/ ADOTable1->FieldByName("d31")->AsString.c_str(), /*Replace=*/2);

В таком случае, создается документ с одной строкой таблицы. Но как быть, если в DBGrid имеется 2 и более строк(кол-во всегда разное), и нужно чтобы на одной странице ворда создалось столько же строк, сколько на текущий момент находится в DBGrid?

02.11.2016, 11:35	#1 (permalink)
zena Member Регистрация: 11.11.2010 Сообщений: 85 Сказал(а) спасибо: 0 Поблагодарили 1 раз в 1 сообщении Репутация: 20	Экспорт таблицы из DBgrid в Word Добрый день. Имеется таблица в DBGrid. Её необходимо вставить в шаблон документа word. Задача сразу показалась не сложная: в шаблоне документа прописываем "уникальные идентификаторы", которые просто заменяем нужными данными при экспорте: Код: vVarApp.OlePropertyGet("Selection") .OlePropertyGet("Find").OleProcedure("Execute", /FindText=/ "d1", /MatchCase=/false, /MatchWholeWord=/ false, /MatchWildcards=/false, /MatchSoundsLike=/false, /MatchAllWordForms=/false, /Forward=/true, /Wrap=/1, /Format=/false, /ReplaceWith =/ ADOTable1->FieldByName("d31")->AsString.c_str(), /Replace=/2); В таком случае, создается документ с одной строкой таблицы. Но как быть, если в DBGrid имеется 2 и более строк(кол-во всегда разное), и нужно чтобы на одной странице ворда создалось столько же строк, сколько на текущий момент находится в DBGrid?

02.11.2016, 11:35
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Вот темы которые сильно похожи на вашу, прочтите Экспорт ЖУРНАЛА firefox Экспорт схемы в Dip Trace Сортировка по алфавиту в DBGrid Лада Калина на экспорт Перенос таблицы из WORD в EXCEL

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070