Jak wymusić na drukarce rozdzelczosc 300x300 lub co robie zle ze mi to nie działa
musze sztywno ustawiac w drukarce rodzielczosc wtedy jest ok.
PDEVMODE pDevMode;
THandle hPrnDevMode;
char szName[255],
szDriver[255],
szPort[255];
Printer()->GetPrinter(szName,szDriver,szPort,hPrnDevMode);
if(hPrnDevMode!=0)
{
pDevMode=(PDEVMODE)GlobalLock((HANDLE)hPrnDevMode) ;
if(pDevMode == NULL)
throw Exception("Nie można pobrać wskaźnika do DEVMODE") ;
pDevMode->dmFields |=DM_PRINTQUALITY | DM_YRESOLUTION;
pDevMode->dmPrintQuality = 300;
pDevMode->dmYResolution =300;
GlobalUnlock((HANDLE)hPrnDevMode);
if(!PrintDialog1->Execute())
{
return;
}
//Rozpocznij drukowanie
Printer()->BeginDoc();
Printer()->Title="MCGC Sp z o.o";
int xp = Printer()->PageWidth;
int yp = Printer()->PageHeight;
Printer()->Canvas->TextOut(x/30,y/5.3+50 ,"PESEL");
catch(...)
{
Application->MessageBox("Błąd drukarki.",
"Komunikat", MB_OK | MB_ICONHAND);
}
if(Printer()->Printing)
{
Printer()->EndDoc();
}
}