A nyomtató tálcáinak vezérlése Delphi-ből

A nyomtató tálcáinak vezérlése Delphi-ből
2005-08-09T15:56:25+02:00
2005-08-16T10:10:11+02:00
2022-10-26T14:20:42+02:00
Herényi István
Két tálcás nyomtatóm van. Az egyik tálcán sárga, a másodikban fehér lapokkal. A programon belül tudom azt, hogy mikor szeretnék sárga és mikor fehér oldalt kezdeni, de hogyan tudom Delphi-ből kiválasztani a tálcát, amelyről az új oldal betöltődik? A TPrinter komponenst használom, de nem nem találtam megoldást. A nyomtatót csak hálózaton keresztül tudom elérni és képeket is szeretnék nyomtatni (nem jó tehát olyan megoldás, hogy escape szekvenciákat küldök LPT1-re).
Köszönettel

Herényi István
Mutasd a teljes hozzászólást!
Sajnos így nem sikerült végrehajtanom, mert ha egy nyomtatót újra installáltam is, akkor is csak egy példányban jelent meg a ControlPanelen. Úgy tűnik azonban, hogy jó megoldást találtam a következő dokumentumban:
http://safariexamples.informit.com/0672321157/Ebooks/D5DG/chapter10...
A megoldás így néz ki:

procedure SetPrinterPageSource(PaperSource: Word); var Device, Port, Driver : array[0..255] of Char; DeviceMode : THandle; DevMode : PDevMode; begin Printer.GetPrinter(Device, Driver, Port, DeviceMode); DevMode:= GlobalLock(DeviceMode); with DevMode^ do begin dmDefaultSource:= PaperSource; dmFields := dmFields or dm_DefaultSource; end; GlobalUnlock(DeviceMode); end;

Herényi István

Mutasd a teljes hozzászólást!

Tetszett amit olvastál? Szeretnél a jövőben is értesülni a hasonló érdekességekről?
abcd