Помогите разобраться с Printer_Lib

Никита Однороб · **Добавлено:** Сб фев 16, 2013 11:34 am

Кто работал с Printer_Lib, можете помочь? Почему не печатает текст?

Код:

1
2
3
4
5
6
7
Print_OpenPrinter("","PAPERSIZE="+Str(#DMPAPER_A4)+",ORIENTATION="+Str(#DMORIENT_PORTRAIT))
Print_StartPrinting("TEST")
Print_SetTextColor(#Black)
Print_Font("Arial",16)
Print_DrawText(20,100,Print_GetLineWidth(),100,"Привет Как дела?",#DT_WORDBREAK|#DT_CALCRECT)
Debug Print_GetLastError()
Print_StopPrinting()

Fox · **Добавлено:** Сб фев 16, 2013 12:29 pm

Код:

1
2
3
4
5
6
7
8
Print_OpenPrinter("","PAPERSIZE="+Str(#DMPAPER_A4)+",ORIENTATION="+Str(#DMORIENT_PORTRAIT)) 
Print_StartPrinting("TEST") 
Print_SetTextColor(#Black) 
Print_Font("Arial",16) 
Print_DrawText(20,100,Print_GetLineWidth(),100,"Привет Как дела?",#DT_WORDBREAK|#DT_CALCRECT) 
Debug Print_GetLastError()
Print_EndPagePrinter()
Print_StopPrinting()

Никита Однороб · **Добавлено:** Сб фев 16, 2013 3:50 pm

Fox, вот так заработало:

Код:

1
2
3
4
5
6
7
8
9
Print_OpenPrinter("","PAPERSIZE="+Str(#DMPAPER_A4)+",ORIENTATION="+Str(#DMORIENT_PORTRAIT)) 
Print_StartPrinting("TEST") 
Print_SetTextColor(#Black) 
Print_Font("Arial",16) 
Print_SetUnits(#PRINT_MM)
Print_DrawText(10,10,190,277,"Привет Как дела? jgdsdsds  sdsdsdsd sdsjhhhhhhhhhhhhhhhhhhhhh hhhhhhhhhhhhhhhh hhhhhh",#DT_WORDBREAK) 
Print_GetLastError() 
Print_EndPagePrinter() 
Print_StopPrinting()

Ещё и с автоматическим переносом слов, если не помещается.

Никита Однороб · **Добавлено:** Сб фев 16, 2013 4:02 pm

Кто-нибудь знает, в какой кодировке Scintilla хранит текст?? А то в свой текстовый редактор пытаюсь встроить, набираю текст, а он мне печатает:

Цитата:

??????????????

Вот процедура печати:

Код:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Procedure PrintText(Tab)
  Protected text$
  gadget = GetTabBarGadgetItemData(#Tabs,Tab)
  If IsGadget(gadget)
    text$ = GetGadgetText(gadget)
    If Print_OpenPrinter("","PAPERSIZE="+Str(#DMPAPER_A4)+",ORIENTATION="+Str(#DMORIENT_PORTRAIT)) 
      If Print_StartPrinting("TEST") 
        Print_SetTextColor(#Black) 
        Print_Font("Arial",16) 
        Print_SetUnits(#PRINT_MM)
        Print_DrawText(10,10,190,277,text$,#DT_WORDBREAK)
        Print_GetLastError() 
        Print_EndPagePrinter() 
        Print_StopPrinting()
      EndIf
    EndIf
  EndIf
EndProcedure
 

Может я что-то сделал не так?

Пётр · **Добавлено:** Сб фев 16, 2013 4:09 pm

В Scintilla есть свой функционал для печати, причем печатать будет со всеми стилями текста.

Никита Однороб · **Добавлено:** Сб фев 16, 2013 4:19 pm

Пётр, я знаю, просто, прошуршав справку, я не понял, какое сообщение нужно посылать сначала, какое потом и т.д.

Пётр · **Добавлено:** Сб фев 16, 2013 4:30 pm

Поискать готовый код не догадался? http://www.purebasic.fr/english/viewtop ... GE#p382457

Никита Однороб · **Добавлено:** Сб фев 16, 2013 4:33 pm

Пётр, я видел этот код. Но я не понял, что такое openFName.s. Вроде как колонтитулы

К М О · **Добавлено:** Пн июн 17, 2013 11:01 pm

Русифицированная справка для Printer_Lib (PBv.4.40) здесь: http://dfiles.ru/files/oou1emm2n

purebasic.info

Помогите разобраться с Printer_Lib

Кто сейчас на форуме