IT's Blog

Как напечатать в порт в WinNT

30.12.2001
IT IT
Здравствуйте serginio, Вы писали:

S>Необходимо реализовать печать на матричный принтер с использованием его ПЗУ-шных шрифтов (иначе он слишком медленно печатает) из-под WinNT WS.

void OnPrintText (LPTSTR PrnName)
{
    HANDLE  prn = NULL;

    DOC_INFO_1  docInfo;
    docInfo.pDocName    = "Text Mode";
    docInfo.pOutputFile = NULL;
    docInfo.pDatatype   = NULL;

    if (::OpenPrinter(PrnName,&prn,NULL)) {
        if (::StartDocPrinter(prn,1,LPBYTE(&docInfo))) {
            if (::StartPagePrinter(prn)) {
                DWORD cw;

                // начало вывода данных
                ::WritePrinter(prn,"123456",sizeof("123456")-1,&cw);
                ::WritePrinter(prn,"\r\n",2,&cw);
                // окончание вывода данных

                ::EndPagePrinter(prn);
            }
            ::EndDocPrinter(prn);
        }
        ::ClosePrinter(prn);
    }
}
30.12.2001 5 комментариев
обсудить в форуме
serginio
serginio
31.12.2001 08:12
Здравствуйте Игорь!

Спасибо за ответ. 03.01.2002 попробую.

Еще раз с наступающим Новым годом!
Сергей.
 
#
MrOrbit
MrOrbit
31.12.2001 04:11
Здравствуйте serginio, Вы писали:

А вы часом не из Питера?
 
#
serginio
serginio
01.01.2002 12:25
Здравствуйте MrOrbit, Вы писали:

MO>Здравствуйте serginio, Вы писали:

MO>А вы часом не из Питера?

Нет, но бывал. Замечательный город!

Сергей.
 
#
MrOrbit
MrOrbit
01.01.2002 01:00
Здравствуйте serginio, Вы писали:

S>Нет, но бывал. Замечательный город!

Весьма польщен столь лестным заявлением Thks

Алексей
 
#
serginio
serginio
05.01.2002 05:07
Здравствуйте IT, Вы писали:


IT>[ccode]
IT>void OnPrintText (LPTSTR PrnName)
IT>{
...............................................

Большое спасибо. Ваш ответ очень помог. Разобрались.

Сергей.
 
#
  обсудить в форуме