Форум » [x]Harbour » Настройка формата листа DOC-файла... » Ответить

Настройка формата листа DOC-файла...

Andrey: Как сделать настройку формата страницы листа .DOC в зависимости от ширины таблицы ? Ширину своей таблицы уже знаю: [pre2]nWidthTsb := oBrw:GetAllColsWidth() // ширина всех колонок таблицы в пикселах[/pre2] Задаю поля страницы (но они в других единицах): [pre2] oWord:ActiveDocument:PageSetup:LeftMargin := 72.0 //~2.5 см // книжная ориентация oWord:ActiveDocument:PageSetup:Orientation := wdOrientPortrait // альбомная ориентация oWord:ActiveDocument:PageSetup:Orientation := wdOrientLandscape[/pre2] Сколько пикселов в формате А4 для книжной и альбомной ориентации листа ? Кто знает как это сделать ?

Ответов - 27, стр: 1 2 All

Dima: Sergy пишет: Тут есть Хотел я ему эту ссылку дать , но там же далеко не все функции...

Andrey: Спасибо ! Добавил к себе в документацию...

Sergy: Dima пишет: Хотел я ему эту ссылку дать , но там же далеко не все функции... После изучения "далеко не всех функций" есть смысл залезть в \hb\contrib\hbwin\*.* - там точно "всё есть".


Dima: Sergy пишет: там точно "всё есть" Тоже не рискнул дать ему этот вариант

Andrey: Сделал такую конструкцию: [pre2] Try oWord := CreateObject( "Word.Application" ) Catch cMsg := REPLICATE( "-._.", 16 ) + ";;" cMsg += SPACE( 5 ) + "On this computer MS Word is not installed !;;" cMsg += SPACE( 5 ) + " Error code [" + win_oleErrorText() + "];;" cMsg += SPACE( 5 ) + " Error code [" + Ole2TxtError() + "];;" cMsg += REPLICATE( "-._.", 16 ) + ";;" cMsg := AtRepl( ";", cMsg, CRLF ) MsgStop( cMsg , "Error!") Return .F. End Try[/pre2] Результат при отсутствии Ворда на компе: Получается, что можно пользоваться обеими функциями ? Непонятно получается. Я у себя в проекте указываю нужные мне библиотеки: -lminigui -ltsbrowse -lhbxlsxml -lhbwin А к проекту ещё добавляются библиотеки, в ходе компиляции ? Ole2TxtError() содержится в 2х библиотеках - hbole.lib и xhb.lib

Dima: Andrey пишет: hbole.lib gfilatov2002 пишет: Ожидал подобное замечание, поскольку произошел отказ от устаревшей библиотеки HbOLE И на хрена ты её туда лепишь теперь ?

Andrey: Dima пишет: И на хрена ты её туда лепишь теперь ? Ничего я не леплю. Вот читай что у меня в проекте: Andrey пишет: Я у себя в проекте указываю нужные мне библиотеки: -lminigui -ltsbrowse -lhbxlsxml -lhbwin Как другие библиотеки добавляются к моему проекту ?



полная версия страницы