Drucken-Problem!
Hallo, ich habe folgendes Problem:
Ich weiß, dass ich mein Formular 1 so drucken kann: form1.print Aber ich möchte vor dem Drucken die Möglichkeit geben den Drucker auszuwählen bzw. andere Einstellungen(Druckerinterne Dinge wie Paier, Format-->automatisch mit dem Druckerauswahldialog möglich) vorzunehmen! Wie kann ich das realisieren? |
Re: Drucken-Problem!
Schau mal nach TPrinter oder per Windows API
|
Re: Drucken-Problem!
TPrintDialog hilft Dir auch weiter.
|
Re: Drucken-Problem!
Aber wie rufe ich dieses Dialogfeld auf!(durch einen Button z.B.), sodass danach entsprechend gedruckt wird?
|
Re: Drucken-Problem!
Mit PrintDialog.Execute, aber das steht alles in der Hilfe, da muss man auch mal reinschauen.
|
Re: Drucken-Problem!
Aber wenn ich das Dialog-Feld aufrufe und dann OK klicke, druckt er noch lange nicht!!!
|
Re: Drucken-Problem!
Wie rufst Du es denn auf?
|
Re: Drucken-Problem!
Ich rufe es so auf:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
begin PrintDialog1.Execute; end; |
Re: Drucken-Problem!
Der PrinterDialog dient ja auch nur den Druckereinstellungen
|
Re: Drucken-Problem!
Execute ruft ja auch nur den Dialog auf, Drucken musst Du schon selbst. Außerdem ist Execute eine Funktion.
|
Re: Drucken-Problem!
ich kann ja aber nicht einfach Form1.Print hinzufügen, dann druckt er doch ohne die Einstellungen beachtet zu haben oder?
Wie schaffe ich es, dass er beim OK-drücken automatisch druckt?(if-->then????) |
Re: Drucken-Problem!
Delphi-Quellcode:
if PrintDialog1.Execute then
Print; |
Re: Drucken-Problem!
Der Dialog konfiguriert den Standard-Drucker, wenn du anschliessend druckst, werden die Einstellungen verwendet!
|
Re: Drucken-Problem!
Das klappt, vielen Dank! EIne Frage habe ich noch:
Wie schaffe ich es, dass das Formular zentriert ausgedruckt wird(im Moment hängt es links oben in der Ecke!)? |
Re: Drucken-Problem!
Das wirst Du wohl selber berechnen müssen (zumindest wüsste ich nichts Fertiges dafür). Ein Abbild des Formulars bekommst Du mit GetFormImage, Drucken kannst Du auf Printer.Canvas (Unit Printers).
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 06:43 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz