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

Вниз

Изменение значений шаблона MS Word   Найти похожие ветки 

 
Fedia   (2004-09-15 08:03) [0]

Уважаемые мастера.
Немножко замучился вот с какой проблемой. Мне необходимо перед занесением информации в документ Word, изменить параметры шрифта MS Word, заданные по умолчанию. В частности изменить название шрифта и размер. Как это сделать?
Документ Word создаю посредством функции CreateOleObject("Word.Application");


 
Fedia   (2004-09-15 09:06) [1]

Посмотрел как это делается в Visual Basik:    
   With ActiveDocument.Styles(wdStyleNormal).Font
       .Name = "Courier"
       .Size = 9
   End With
Но не могу дорубиться как это перевести в Object Pascal?


 
Карелин Артем ©   (2004-09-15 09:26) [2]

WordApp.ActiveDocument.Styles[-1].Font.Name: = "Courier";
WordApp.ActiveDocument.Styles[-1].Font.Size: = 9;


 
Fedia   (2004-09-15 09:37) [3]

на строчке
WordApp.ActiveDocument.Styles[-1].Font.Name: = "Courier";
выдает ошибку: "Item" не является свойством.


 
Карелин Артем ©   (2004-09-20 15:41) [4]

WordApp.ActiveDocument.Styles(-1).Font.Name: = "Courier";



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

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

Наверх




Память: 0.44 MB
Время: 0.04 c
1-1095335393
roma
2004-09-16 15:49
2004.10.03
Icon


4-1092864965
Зяц
2004-08-19 01:36
2004.10.03
Как задвинуть дверцу CDROM обратно


1-1095568487
Fedia
2004-09-19 08:34
2004.10.03
Прерывание работы программы


1-1095652380
Артем К.
2004-09-20 07:53
2004.10.03
Здравствуйте. Как сделать анимированный курсор в программе?


3-1094036403
Andrey
2004-09-01 15:00
2004.10.03
Создание псевдонима при инсталяции





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