Registriert seit: 4. Nov 2004
Ort: Basel (CH)
76 Beiträge
Delphi 2007 Professional
|
Re: Druckproblem
19. Apr 2008, 19:27
Hab es selbst rausgefunden.
Da ich von der Klasse TPrinter ableitete, musste ich beim ändern der Eigenschaft PrinterIndex noch SetPrinter aufrufen:
Delphi-Quellcode:
procedure TSZPrinter.setPrinterIndex(value: integer);
begin
inherited PrinterIndex := value;
{ Reinit the hDMode }
GetPrinter(aDevice, aDriver, aPort, hDMode);
hDMode := 0;
SetPrinter(aDevice, aDriver, aPort, hDMode);
end;
Danke trotzdem!
Debugging is twice as hard as writing the code in the first place. Therefore, if you write the code as cleverly as possible, you are, by definition, not smart enough to debug it.
|