Hallo,
ich habe ein Problem mit dem Drucken aus einem Windows-Dienst heraus bzw. bereits mit der Druckerzuweisung.
Folgender Quelltext:
Delphi-Quellcode:
for i := 0 to printer.printers.Count-1 do // heraussuchen aller definierten Windows-Drucker
begin
if printer.Printers.strings[i] = DrName then druckerindex := i; // DrName kommt aus einem Datenbankeintrag
end;
printer.Printerindex := druckerindex;
// die Alternative wäre:
printer.SetPrinter(pChar(DrName), pchar('WINSPOOL'), PCHAR(''), Art);
Der Code funktioniert in einem normalen Progamm ohne Probleme, leider nicht in einem Dienst.
Hat jemand einen Tip ?
Gruss