Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

MS Word [D6, Win95/98]


Килилл ©   (2003-02-08 00:54:00) 

Прошу прощения, я всех уже заколебал, но так и не понял, как VB yf паскаль перевести. Например, как вот это объяснить компилятору (это запись макроса из двух действий: начать нумерованный список и ввести пару строк
извините, если много текста, но т.к. в VB я не очень то силен, боялся, что непоймете)

With ListGalleries(wdNumberGallery).ListTemplates(1).ListLevels(1)
.NumberFormat = "%1."
.TrailingCharacter = wdTrailingTab
.NumberStyle = wdListNumberStyleArabic
.NumberPosition = CentimetersToPoints(0.63)
.Alignment = wdListLevelAlignLeft
.TextPosition = CentimetersToPoints(1.27)
.TabPosition = CentimetersToPoints(1.27)
.ResetOnHigher = 0
.StartAt = 1
With .Font
.Bold = wdUndefined
.Italic = wdUndefined
.StrikeThrough = wdUndefined
.Subscript = wdUndefined
.Superscript = wdUndefined
.Shadow = wdUndefined
.Outline = wdUndefined
.Emboss = wdUndefined
.Engrave = wdUndefined
.AllCaps = wdUndefined
.Hidden = wdUndefined
.Underline = wdUndefined
.Color = wdUndefined
.Size = wdUndefined
.Animation = wdUndefined
.DoubleStrikeThrough = wdUndefined
.Name = ""
End With
.LinkedStyle = ""
End With
ListGalleries(wdNumberGallery).ListTemplates(1).Name = ""
Selection.Range.ListFormat.ApplyListTemplate ListTemplate:=ListGalleries( _
wdNumberGallery).ListTemplates(1), ContinuePreviousList:=False, ApplyTo:= _
wdListApplyToWholeList, DefaultListBehavior:=wdWord9ListBehavior
Selection.TypeText Text:="t"
Selection.TypeParagraph
Selection.TypeText Text:="y"
Selection.TypeParagraph
Selection.Range.ListFormat.RemoveNumbers NumberType:=wdNumberParagraph


Кирил   (2003-02-09 00:51:00) [1]

А как работать с COM-серверами Word? Хотя бы первые несколько действий, дальше сам разберусь, я смышленый :)


vl_chel   (2003-02-08 14:27:00) [2]

Книга Елмановой COM+


Calm   (2003-02-08 12:45:00) [3]

Можно работать с COM-серверами Word.
У интерфейсов практически такие же методы как и в VB.


Кри Кри   (2003-02-08 01:16:00) [4]

Ща-ща, ща переведу.


Наверх

Титульная страница Поиск, карта сайта Написать письмо