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);
    }
}