Повернемося до висновку в Word. Підемо по порядку.
Не забуваємо, що для кожної форми, де буде висновок даних, необхідно проробляти всі ці дії. Якщо, звичайно, ви порядна програміст, то можете зробити бібліотеку або клас. Все на ваш розсуд. Про всяк випадок опишу детальніше, куди і що прописувати.
Відкрийте код вашої форми і почнемо.
У блоці «interface» -> «uses» підключіть модулі WordXP, ActiveX, ComObj.
У блоці «interface» -> «« type »опишіть майбутню процедуру - procedure repl (stroke: string; rpl: string);
У блоці «interface» -> «« public »додаємо змінну - MSWord: variant;
У блоці «implementation» -> після «» вставляємо процедуру.
Зауважимо, що TF_MAin - це мій ідентифікатор форми. У вас цей параметр буде відрізнятися. Його можна подивитися в «interface» -> «type» першим рядком TF_MAin = class (TForm).
У чому полягає сенс цієї процедури. Він знаходить слова-ідентифікатори і замінює їх.
Не забуваємо, що в файлі необхідно розставити ці слова в форматі. Тільки англійською і саме в таких дужках. Щоб він випадково не замінив інший текст. Насправді ви можете замінювати будь-які слова, тільки часом це буде чревато. А так вже точно не заміните інший текст.
І так, перейдемо до використання даної функції.
Не забудьте, що необхідно попередньо створити файл Word. Я створив файл «NameDoc.doc» в папці «report» і всередині файлу написав, щоб замінити його на сьогоднішню дату.
Зауважу, що всі стилі зберігаються, тобто при заміні буде жирним підкресленим курсивом.
Перейдемо до більш складного прикладу - використання таблиць в нашому шаблоні.
Я створив ось таку табличку в файлі: