高分求助！如何通过代码修改打印机的默认设置

[arnold2]

如何通过代码修改打印机的默认设置，谢谢

[laishishenghust]

THandle hDMode;
PDevMode pDMode;

TPrinter *Prn = Printer();
//设置打印环境
Prn->GetPrinter(Device,Driver,Port,hDMode);
pDMode=(PDevMode)GlobalLock((HGLOBAL &)hDMode);
pDMode->dmPaperSize= 256;
pDMode->dmFields=pDMode->dmFields|DM_PAPERSIZE;



pDMode->dmPaperLength = 101; //设置纸高


pDMode->dmFields = pDMode->dmFields|DM_PAPERLENGTH;
pDMode->dmPaperWidth = 80; //设置纸宽
pDMode->dmFields =pDMode->dmFields|DM_PAPERWIDTH;

ResetDC(Prn->Handle,pDMode);
GlobalUnlock((HGLOBAL &)hDMode);

[FlySky01]

TPrinter::SetPrinter(char * ADevice, char * ADriver, char * APort, int ADeviceMode);

[arnold2]

我照你做了，为什么不行