Автор | Сообщение |
|
| |
Пост N: 3230
Зарегистрирован: 17.05.05
|
|
Отправлено: 18.06.13 11:18. Заголовок: Снова WIN_PRN (Hbwin)
Устал бороться с этой проблемой , не работает кол-во копий, всегда печатается 1 копия. Просьба проверить как у кого отработает под Harbour. У меня Harbour 3.2.0dev (Rev. 18920) Пример PROC Main() LOCAL oPrinter, i LOCAL cPrinter:=win_printerGetDefault() oPrinter := Win_Prn():New( cPrinter ) oPrinter:Copies := 2 oPrinter:Create() oPrinter:startDoc("testprn") FOR i := 1 TO 40 oPrinter:TextOut(str(i)) oPrinter:NewLine() NEXT oPrinter:endDoc() oPrinter:Destroy() return PS Пробовал под Mingw и Bcc
|
|
|
Ответов - 21
, стр:
1
2
All
[только новые]
|
|
|
| |
Пост N: 80
Зарегистрирован: 24.04.13
|
|
Отправлено: 11.12.14 15:07. Заголовок: Нужно было ужать рас..
Нужно было ужать распечатку чтобы влезла на лист A4. Указал oPrinter:LineHeight := 90, стало нормально. Насчет значения LineHeight = 6 по умолчанию сомневаюсь. Судя по всему >100.
|
|
|
Ответов - 21
, стр:
1
2
All
[только новые]
|