Word Basic
От: Alexis2k  
Дата: 18.01.02 07:07
Оценка:
Как заставить Word повернуть страницу горизонтально?

Как передать в Word строки ДОСовской кодировки?
Re: Word Basic
От: retalik www.airbandits.com/
Дата: 18.01.02 08:30
Оценка:
Здравствуйте Alexis2k, Вы писали:

Прежде всего, ты, наверное, не про WordBasic спрашиваешь (это старье я в последний раз встречал в Word 6.0), а про VBA?

A>Как заставить Word повернуть страницу горизонтально?

ActiveDocument.PageSetup.Orientation = wdOrientLandscape


A>Как передать в Word строки ДОСовской кодировки?

Что значит передать?
Конвертировать строки можно вызовом WinAPI функций OemToChar и т.д. (из VBA они доступны, если их правильно описать):
Public Declare Function OemToChar Lib "user32" Alias "OemToCharA" _
    (ByVal lpszSrc As String, ByVal lpszDst As String) As Long

(Я долго парился с описанием, потом запустил API TextViewer и получил то же самое :) )
Успехов,
Виталий.
Re: Word Basic
От: Alexis2k  
Дата: 21.01.02 05:18
Оценка:
Здравствуйте Alexis2k, Вы писали:

A>Как заставить Word повернуть страницу горизонтально?


A>Как передать в Word строки ДОСовской кодировки?


Спасибо, очень помогло.

Есть еще одна проблема: Readln передает строки из текстового файла в поле-получатель, но при этом изчезают пробелы в начале строки. Как с этим справиться?
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.