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

Вниз

Есть такая проблема, имеется шаблон документа в Вордовском   Найти похожие ветки 

 
DimaIv   (2002-03-25 20:43) [0]

формате, в нём вставляю например такие теги <Firms> или <Fone>
эти самые тэги нужно автоматически заменить например на АО МММ и 333-33-33 (то на что заменяем берётся из БД, АО МММ из таблицы Firms поле Name), как сделать так чтобы можно было добавлять новые тэги без компиляции проекта. Например вставляю в шаблон новый тэг <DateE> а при замене на его место встает запись из таблици Dates из поля DateEnd.


 
DimaIv   (2002-03-25 21:16) [1]

Забыл сказать, что БД Paradox.


 
XanderMan   (2002-03-26 08:59) [2]

Попробуй создать еще одну таблицу в БД, в которой будут поля:
наименование тега (<DateE>);
наименование таблицы;
наименование поля;
тип поля (может быть)
После этого в программе необходимо произвести обычную трансляцию, подставляя значения поля через выражение:

(DataModule.FindComponent("TableName") as TTable).FieldByName("FieldName").AsString


 
DimaIv   (2002-03-27 05:57) [3]

Спасибо попробую.
Может ещё что-нибудь ктони-будь скажет.


 
Владислав   (2002-03-27 06:20) [4]

Запусти в Word"е запись макроса. Запусти замену. Впиши в соответсвующие поля, что найти и на что заменить. Нажми кнопку заменить. Останови запись макроса. Перейди в редактор Visual Basic"а и посмотри, как это реализуется в VB. Этот код можно перенести в Delphi. Примеры на эту тему есть в FAQ: http://delphi.mastak.ru/cgi-bin/faq.pl?look=1&id=988619885&n=18
Если что-то еще не понятно, спрашивай.

"... как сделать так чтобы можно было добавлять новые тэги без компиляции проекта..."

А вот это - не самая тривиальная задача. И я именно ей занимаюсь. Пиши, может вместе что-то сообразим.



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

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

Наверх





Память: 0.45 MB
Время: 0.005 c
3-22556
denys
2002-03-15 16:18
2002.04.08
array columns


1-22732
SPeller
2002-03-27 07:43
2002.04.08
Есть ли такая функция..


1-22627
Zool
2002-03-27 19:37
2002.04.08
Очень просто


3-22530
Sergey-ZZZ
2002-03-04 19:12
2002.04.08
FastReport245


7-22849
SVF
2002-01-10 20:49
2002.04.08
Как можно определить размер файла





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский