Drucken mit gleichzeitigem generieren eines PDFs

[oakley]

Hallo,

also das Ganze kommt aus einer Fremdanwendung und ich habe keinen Einfluss auf den Druckauftrag oder wie oft gedruckt wird.
Das Beste wäre wahrscheinlich den Auftrag ab zufangen, eine prn Datei schreiben zu lassen und diese dann zum Erstellung des PDF zu verwenden.
So weit so gut aber es bestehen die beschriebenen Probleme.

LG

Mirko

[HolgerX]

Hmm..

Zitat von oakley:

Hallo,

also das Ganze kommt aus einer Fremdanwendung und ich habe keinen Einfluss auf den Druckauftrag oder wie oft gedruckt wird.
Das Beste wäre wahrscheinlich den Auftrag ab zufangen, eine prn Datei schreiben zu lassen und diese dann zum Erstellung des PDF zu verwenden.

Genau deshalb hatte ich Redmon vorgeschlagen (was auch noch unter Win10 läuft!).
Redmon kann die Druckdaten an dein eigenes Programm weiter leiten und dieses erzeugt daraus per z.B. GhostScript ein PDF dem Du den Hintergrund bei Aufruf von GS mitgibst. Zusätzlich dann noch ein Ausdruck auf einem Drucker deiner Wahl, hier dann ohne deinen Hintergrund!

[oakley]

Hallo Holger,

okay ich habe Redmon installiert und den Port RPT1 erzeugt.
Ich leite den Ausdruck also zu meinem Programm um wo ich einmal das PDF erzeuge und einmal an den Drucker weiter leite.
Wie komme ich an die Daten, die ans Programm übergeben werden?

Delphi-Quellcode:

var
  Input: TStream;
begin
  Input := THandleStream.Create(GetStdHandle(STD_INPUT_HANDLE));
  ...

Eventuell so aber was mache ich danach damit?

LG

Mirko

[Rollo62]

Redmon ist eine tolle Sache.

Das hier ist das Einzige was mich etwas stört, auch wenn es dann jetzt doch noch mit Win10 funktionert,
scheint der zukünftige Support bei 0 zu liegen.

Zitat:

Won't be implemented:

Remote printing to a printer that uses RedMon.
Support for Windows 10

[oakley]

Ja das hab ich auch gelesen und deswegen dachte ich dass es mit Windows 10 nicht mehr läuft.

Eigentlich bräuchte man bei Redmon gar kein eigenes Programm oder?
Ich bin jetzt soweit, dass ich ein PDF mit Ghostscript pdfwrite bekomme und dann aber den Ausdruck gleichzeitig an einen Netzwerkdrucker weiterleiten kann.
Problem ist noch: Wie bekomme ich den Hintergrund ins PDF und auf dem Drucker wird nichts ausgedruckt. Egal was ich im Redmon Port einstelle.
REDMON_OUTPUTPRINTER zeigt den richtigen Namen des Druckers aber egal ob Copy stdout to printer, Copy temporary file to printer oder Copy pipe to printer es kommt nichts an.

LG

Mirko

[HolgerX]

Hmm..

Wenn die Daten per Redmon mit StdOut geschickt werden, dann geht das:

Delphi-Quellcode:

function ReadStdInStream(AStream : TStream):boolean;
var
  Stdin : THandleStream;
  BytesRead : Int64;
  Buffer : array[0..1023] of Byte;
begin
  result := false;
  try
    StdIn := THandleStream.Create(GetStdHandle(STD_INPUT_HANDLE));
    try
      StdIn.Seek(0,0);
      repeat
        BytesRead := StdIn.Read(Buffer,1024);
        if BytesRead > 0 then
          AStream.WriteBuffer(Buffer,BytesRead);
      until BytesRead <= 0;
    finally
      StdIn.Free;
    end;
    result := (AStream.Size > 0);
  except
    on E:Exception do begin
// Fehlerbehandlung
    end;
  end;
end;

Dann an der richtigen Stelle in einer Kopie des Streams dein Hintergrundbild einfügen (dazu brauchst Du PS Kenntnisse oder GOOGLE).
Oder erzeugst erst das PDF und fügst dann das Bild z.B. mit
http://www.lagotzki.de/pdftk/index.html#background
hinzu.

Anschießend mit GS als PDF speichern.
Zum Ausdrucken des original Streams kannst Du dann auch GS verwenden (Google ist auch hier dein Freund)...

Redmon in Verbindung mit einem PS Druckertreiber ist notwendig um die PS-Daten korrekt zu erhalten (von jegweligem Programm aus).
Dein Programm, um die Bearbeitung und die Weiche sauber zu machen...

[Rollo62]

Zitat von Rollo62:

Redmon ist eine tolle Sache.

Das hier ist das Einzige was mich etwas stört, auch wenn es dann jetzt doch noch mit Win10 funktionert,
scheint der zukünftige Support bei 0 zu liegen.

Zitat:

Won't be implemented:

Remote printing to a printer that uses RedMon.
Support for Windows 10

Ich muss mich da vielleicht korrigieren:
Es scheint sich hier jemand dem Redmon angenommen zu haben, und es in das MFileMon Projekt integriert zu haben.
https://github.com/lomo74/mfilemon
Binaries gibt es auch.
Das scheint jedenfalls aktuell und gepflegt zu sein, und könnte der Nachfolger des Redmon sein.
Habe jetzt nicht gecheckt ob es 1:1 dem Orginal Redmon entspricht, ich denke aber schon,
vielleicht weiß jemand mehr darüber.

[Rollo62]

Ich habe das MFileMon mal getestet, hier die Dokumentation zur Installation.
MFileMon.pdf

So sieht die aktuelle Einstellung aus
MFileMon.jpg

Es scheint so zu funktionieren, allerdings bekomme ich kein PDF daraus, sondern immer nur ein .PS.
Wenn ich das .PS dann am Ende manuell via GS zu PDF konvertiere scheint alles OK zu sein.

Die Anleitung ist wohl OK, es fehlt womöglich nur eine kleine Änderung im Command feld.

Das Command soll meiner Meinung nach so funktionieren, dass via der Drucker via Pipe etwas an MFileMon schickt.
Allerdings soll der Haken bei Win10 nicht gesetzt sein, weil es da irgendwie anders funktioniert.

User command:
"C:\Program Files\gs\gs9.27\bin\gswin64c.exe" -dBATCH -dSAFER -dNOPAUSE -sDEVICE=pdfwrite -dPDFSETTINGS=/prepress -dAutoRotatePages=/PageByPage -r600 -sOutputFile="%f" -

!! Important: Keep traling hyphen -
This should be replaced by the input stream from the printer.

Vielleicht hat jemand Erfahrung mit der Konfiguration von MFileMon / Redmon / GS, und sieht den Fehler ?
Oder liegt es doch an einem Fehler in MFileMon ?

[oakley]

Hallo Rollo,

habe in der Firma Redmon und zu hause MFileMon isntalliert.
In der Firma funnktioniert das Generieren eines PDFs mit dem Kommando das Du verwendest unter Filemon.
Hier zu Hause bekomme ich Redmon zwar installiert, bekomme aber beim Hinzufügen des Ports einen "unknown error".

MFileMon ließ mich den Port installieren, bekomme aber auch nur ein PS File heraus, genau wie Du.

Wenn ich -sOutputFile einen festen Dateinamen gebe funktiniert das bei Redmon. Bei MFileMon nimmt er den Dateinamen, der oberhalb eingegeben wurde.
Es sieht so aus, als würde er den Ghostscript Befehl gar nicht ausführen. Logdateien werden auch nicht geschrieben, egal was man im Dropdown eingibt.


LG

Mirko