Автор | Сообщение |
|
| |
Пост N: 2758
Зарегистрирован: 17.05.05
|
|
Отправлено: 14.03.13 18:00. Заголовок: PAGESCRIPT 32 FOR (X)HARBOUR
Пытаюсь прикрутить PageScript 32 к проге на Harbour и облом. К проге на Xharbour прикрутил нормально (работает) Есть в TPSCRIPT.PRG (поставляется вместе с библой) #include "PScript.ch" #include "FileIO.ch" #ifdef __XHARBOUR__ // 02.06.2005 - IBTC - changed for xHarbour Builder: #xtranslate Method <Classname>:<x> => Method <x> #define DLL_STDCALL NIL #include "hbclass.ch" #else #include "Xbp.ch" #include "Dll.ch" #endif Harbour естественно не находит Xbp.ch , Dll.ch , не пойму что делать. =============================================== PAGESCRIPT 32 FOR (X)HARBOUR =============================================== This file contains important supplementary and late-breaking information that may not appear in the main product documentation. We recommend that you read this file in its entirety. In order to use PageScript 32 with (x)Harbour, you'll need to distribute PSCRIPT.DLL with your programs. We recommand that PSCRIPT.DLL be copied in the application's folder in order to avoid DLL versions conflicts. Three files needs to be included in your (x)Harbour projects : 1 - DLLCALL.C 2 - TPSCRIPT.PRG 3 - PSCRIPT.CH DLLCALL.C gives PageScript a way to call DLL functions in the same way as Xbase++ does. This interface is contributed by Paul Tucker, Ontario, Canada. Many thanks to him for this great contribution. TPSCRIPT.PRG contains all the PageScript 32 functions and one class, named TPageScript. You may either choose to call PS functions or instantiate TPageScript and use its methods. When you use functions, calling PSInit() automaticaly instanciates a Static TPageScript object. PSCRIPT.CH contains constants used by PageScript 32. Что то не пойму она будет вообще с Hаrbour работать http://www.abeelabs.com/pagescript32/index.php у меня версия 1.3.4.0
|
|
|
Новых ответов нет
, стр:
1
2
3
4
5
All
[см. все]
|
|
|
| |
Пост N: 2786
Зарегистрирован: 17.05.05
|
|
Отправлено: 17.03.13 18:52. Заголовок: Все , разобрался. Пр..
Все , разобрался. Прицепил к проге.
|
|
|
|
| |
Пост N: 4603
Зарегистрирован: 17.05.05
|
|
Отправлено: 18.03.15 18:52. Заголовок: Кто то работает Page..
Кто то работает с PageScript под Harbour , или только я один ? Есть вопросик. Функция PSBitmap нормально растягивает картинку по заданным координатам. Но понадобилось печать выводить в PDF формате. В PageScript есть такая возможность через PSSetDevice(3) , все выводится красиво но вот с PSBitmap проблема и изображение не растягивается как следует по горизонтали. То есть грубо говоря если я хочу вписать картинку в прямоугольник шириной 100 мм , то картинка (при PSSetDevice(3)) впишется только в ширину 90 мм. По высоте все чётко. Если выводить на просмотр средствами PageScript или сразу на печать , такой проблемы нет.
|
|
|
|
| moderator
|
Пост N: 1167
Зарегистрирован: 11.02.10
|
|
Отправлено: 15.08.17 10:41. Заголовок: Dima пишет: Кто то ..
Dima пишет: цитата: | Кто то работает с PageScript под Harbour |
| В продолжение темы - PageScript теперь живет по адресу http://pagescript32.com/ и поддержка PDF в его движке существенно переработана и исправлена. Новые владельцы этого продукта обещают уже скоро анонсировать новую версию этой DLL. Кстати, будет обеспечена поддержка 64-битной версии также. Если это будет интересно, то смогу включить их базовый тестовый пример в новую сборку Минигуи. Ваши комментарии приветствуются
|
|
|
|
| |
Пост N: 6528
Зарегистрирован: 17.05.05
|
|
Отправлено: 15.08.17 12:30. Заголовок: gfilatov2002 Интере..
gfilatov2002 Интересно конечно. А кроме HTML хелпа , где то есть страница с загрузкой самого PS32 ? Или снова за бабки ? ))
|
|
|
|
| moderator
|
Пост N: 1168
Зарегистрирован: 11.02.10
|
|
Отправлено: 15.08.17 12:46. Заголовок: Dima пишет: где то ..
Dima пишет: цитата: | где то есть страница с загрузкой самого PS32 |
| Они обещают первую бету раздавать бесплатно, когда она будет готова (адрес выложат на сайте выше). А последующие версии будут платные Я сейчас тестирую такую предварительную версию, и впечатления - приятные, но размер подключаемой DLL увеличился примерно на 1 МБайт за счет полной переработки поддержки PDF формата.
|
|
|
|
| |
Пост N: 6529
Зарегистрирован: 17.05.05
|
|
Отправлено: 17.08.17 14:05. Заголовок: gfilatov2002 Разраб..
gfilatov2002 Разработчики те же ? На каком языке кодят ( ранее был Delphi ) ?
|
|
|
|
| moderator
|
Пост N: 1169
Зарегистрирован: 11.02.10
|
|
Отправлено: 17.08.17 15:11. Заголовок: Dima пишет: Разрабо..
Dima пишет: Нет, права на эту библиотеку выкупила голландская фирма. Dima пишет: цитата: | На каком языке кодят ( ранее был Delphi ) ? |
| Да, это Дельфи. Дополнение о новом компоненте PDF - теперь используется eDocEngine VCL 5 версии (последний билд).
|
|
|
|
| moderator
|
Пост N: 1171
Зарегистрирован: 11.02.10
|
|
Отправлено: 20.08.17 19:40. Заголовок: gfilatov2002 пишет: ..
|
|
|
|
| |
Пост N: 6530
Зарегистрирован: 17.05.05
|
|
Отправлено: 20.08.17 21:32. Заголовок: gfilatov2002 пишет: ..
gfilatov2002 пишет: цитата: | Ваши комментарии приветствуются |
| TRIAL и TRAIL это же разные вещи В демке живет именно TRAIL PS TNFSF10 (чаще обозначается как TRAIL) входит в многочисленное семейство факторов некроза опухоли
|
|
|
|
| |
Пост N: 6533
Зарегистрирован: 17.05.05
|
|
Отправлено: 21.08.17 16:25. Заголовок: gfilatov2002 В цело..
gfilatov2002 В целом все нормально. Ранее помнится был еще и TPSCRIPT.PRG , теперь его не будет ?
|
|
|
|
| moderator
|
Пост N: 1172
Зарегистрирован: 11.02.10
|
|
Отправлено: 21.08.17 16:36. Заголовок: Dima пишет: В целом..
Dima пишет: Dima пишет: цитата: | был еще и TPSCRIPT.PRG , теперь его не будет ? |
| Будет, конечно. Ведь в него добавлены переходники для новых функций, которые, кстати, используются в демке
|
|
|
|
|
| |
Пост N: 175
Зарегистрирован: 05.10.06
|
|
Отправлено: 30.08.17 09:45. Заголовок: Крутая вещь ! А можн..
Крутая вещь ! А можно прикрутить к консольному Harbour ?
|
|
|
|
| |
Пост N: 6549
Зарегистрирован: 17.05.05
|
|
Отправлено: 30.08.17 09:47. Заголовок: MIKHAIL пишет: А м..
MIKHAIL пишет: цитата: | А можно прикрутить к консольному Harbour ? |
| Конечно. У меня давно работает.
|
|
|
|
| |
Пост N: 176
Зарегистрирован: 05.10.06
|
|
Отправлено: 30.08.17 09:53. Заголовок: Dima можешь мне скин..
Dima можешь мне скинуть рабочую версию и если есть описание ?
|
|
|
|
| |
Пост N: 6550
Зарегистрирован: 17.05.05
|
|
Отправлено: 30.08.17 09:58. Заголовок: MIKHAIL https://web..
|
|
|
|
| |
Пост N: 6551
Зарегистрирован: 17.05.05
|
|
Отправлено: 30.08.17 12:38. Заголовок: MIKHAIL Стянул ?..
MIKHAIL Стянул ?
|
|
|
|
| |
Пост N: 177
Зарегистрирован: 05.10.06
|
|
Отправлено: 30.08.17 15:00. Заголовок: Dima пишет: Стянул ..
|
|
|
|
| |
Пост N: 6552
Зарегистрирован: 17.05.05
|
|
Отправлено: 30.08.17 15:13. Заголовок: MIKHAIL Ссылка норм..
MIKHAIL Ссылка нормальная Вот она без подчерка впереди _https://web.archive.org/web/20150201213531/http://abeelabs.com/downloads/PS32.zip PS Я сливал сегодня по ней , всё норм.
|
|
|
|
| |
Пост N: 178
Зарегистрирован: 05.10.06
|
|
Отправлено: 30.08.17 15:43. Заголовок: Dima пишет: https:/..
Dima пишет: цитата: | https://web.archive.org/web/20150201213531/http://abeelabs.com/downloads/PS32.zip |
| Спасибо скачал. Там есть инструкции как подключать к проекту ?
|
|
|
|
| |
Пост N: 6553
Зарегистрирован: 17.05.05
|
|
Отправлено: 30.08.17 15:47. Заголовок: MIKHAIL PAGESCRIPT..
MIKHAIL PAGESCRIPT 32 FOR (X)HARBOUR =============================================== Скрытый текст
This file contains important supplementary and late-breaking information that may not appear in the main product documentation. We recommend that you read this file in its entirety. In order to use PageScript 32 with (x)Harbour, you'll need to distribute PSCRIPT.DLL with your programs. We recommand that PSCRIPT.DLL be copied in the application's folder in order to avoid DLL versions conflicts. Three files needs to be included in your (x)Harbour projects : 1 - DLLCALL.C 2 - TPSCRIPT.PRG 3 - PSCRIPT.CH DLLCALL.C gives PageScript a way to call DLL functions in the same way as Xbase++ does. This interface is contributed by Paul Tucker, Ontario, Canada. Many thanks to him for this great contribution. TPSCRIPT.PRG contains all the PageScript 32 functions and one class, named TPageScript. You may either choose to call PS functions or instantiate TPageScript and use its methods. When you use functions, calling PSInit() automaticaly instanciates a Static TPageScript object. PSCRIPT.CH contains constants used by PageScript 32.
| Правда мне пришлось подправить сырец , вот так Скрытый текст METHOD TPageScript:Init() ::bWaterMark := NIL // Codeblock for Watermark function ::nWaterMark := AWM_NONE // Indicates if the WaterMark is to be printed foreground or background ::lFromDialog := .f. // Indicates if printer selected from printer dialog ::lClipper := .f. // Indicates if calls to TextOut and TextBox should be compatible with PageScript for Clipper ::nUnit := APS_MILL // Default unit is MILLIMETERS ::aPrinters := {} // List of available printers ::nError := PSE_NOERROR // Indicates an error condition, such as no printer available ::aDocInfo := {0, "", "", APS_PORTRAIT, 1, APS_COURIER} // Print job info array ::hDll := DllLoad("PScript.dll") // Handle of the .DLL if ::hDll == nil//0 ::nError := PSE_DLLNOTLOADED // DLL not loaded error else ::nError := DllCall(::hDll, DLL_STDCALL, "PSInit") // No error, set the coordinate system to TOP/LEFT (Default) if ::nError == PSE_NOERROR DllCall(::hDll, DLL_STDCALL, "PSSetCoorSystem", APS_TOPLEFT) endif endif Return Self
| + ихний DLLCALL.C не использую + вверху сырца у меня так Скрытый текст #ifdef __HARBOUR__ // 02.06.2005 - IBTC - changed for xHarbour Builder: #xtranslate Method <Classname>:<x> => Method <x> #include "hbclass.ch" #include "Dll.ch" #else #include "Xbp.ch" #include "Dll.ch" #endif
|
|
|
|
Новых ответов нет
, стр:
1
2
3
4
5
All
[см. все]
|
|