Entwickler-Ecke
Sonstiges (Delphi) - In Datei drucken
Donald - Mo 22.07.02 11:12
Titel: In Datei drucken
Hallo!
Wie kann ich aus Delphi heraus in eine PRN-Datei "drucken"?
Z.Zt. baue ich eine bzw. mehrere Seiten einer Statistik zwischen
BeginDoc und EndDoc zusammen und drucke diese dann direkt. Nun moechte ich aber diesen Ausdruck archivieren, damit er zu einem spaeteren Zeitpunkt nochmal angefordert werden kann.
Hat einer von Euch eine Idee oder evtl. DIE Loesung???
Gruss
Donald
b.brecht - Mo 22.07.02 11:15
Zitat: |
Wie kann ich aus Delphi heraus in eine PRN-Datei "drucken"?
|
Willst du in enie Datei etwas reinschreiben?
Oder wirklich was PRINTEN?
Donald - Mi 24.07.02 09:11
Ich will wirklich was PRINTEN.
Zur Zeit benutze ich das TPrinter-Objekt, um den Ausdruck auszugeben. Dieser soll nun in eine Spooldatei (Endung PRN) ausgegeben werden.
Wie bringe ich TPrinter-Objekt dazu, in eine Datei zu drucken???
Gruss
Donald
Tino - Mi 24.07.02 09:50
Hallo,
ich hatte auch mal dieses "Problem". Ich hab mir die Unit
Printers genommen kopiert und umbenannt z. B. in
tMyPrinter.pas.
Jetzt musst Du nur noch eine Zeile in die
TPrinter.BeginDoc Procedure einfügen:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17:
| procedure tPrinter.BeginDoc; var DocInfo: TDocInfo; begin
with DocInfo do begin cbSize := SizeOf (DocInfo); lpszDocName := PChar (Title); lpszOutput := PChar (OutputFile); end;
end; |
OutputFile ist in meinem Fall eine Eigenschaft die ich dem tPrinter-Objekt hinzugefügt habe:
Delphi-Quelltext
1:
| property OutputFile: string read fOutputFile write fOutputFile; |
Gruß
TINO
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!