Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   einfach nur drucken (https://www.delphipraxis.net/129911-einfach-nur-drucken.html)

fiftyone_88 27. Feb 2009 19:38


einfach nur drucken
 
Hallo miteinander!!
Ich habe folgendes Problem:
Ich habe in mein Formular ein printdialog eingefügt und ein button mit dem ich ihn aktiviere(execute).
Es erscheint nach dem betätigen auch das Fenster, in dem man Druckeinstellungen vornehmen kann wie Anzahl, in Farbe usw. aber wenn ich auf drucken klicke passiert nichts also er druckt nicht.

mein Quelltext für den button onclick lautet:

printdialog1.Execute;

Muss ich da noch was einstellen oder noch was schreiben, weil mein drucker wird angezeigt bei den Optionen und unter Delphi allein kann ich den Quelltext usw drucken.

Kann mir da einer weiter helfen?

Dank im voraus!!!

DeddyH 27. Feb 2009 19:41

Re: einfach nur drucken
 
Hallo und Willkommen in der DP :dp:,
der PrintDialog macht auch nicht mehr, als eine Druckerauswahl samt div. Einstellungen bereitzustellen. Das Drucken musst Du selbst übernehmen. Im worst case über die Printer-Methoden (unit Printers), im günstigsten Falle kannst Du die print-Methode einer Komponente/Klasse aufrufen (RichEdit z.B.).

fiftyone_88 27. Feb 2009 20:01

Re: einfach nur drucken
 
Zitat:

Zitat von DeddyH
Hallo und Willkommen in der DP :dp:,
der PrintDialog macht auch nicht mehr, als eine Druckerauswahl samt div. Einstellungen bereitzustellen. Das Drucken musst Du selbst übernehmen. Im worst case über die Printer-Methoden (unit Printers), im günstigsten Falle kannst Du die print-Methode einer Komponente/Klasse aufrufen (RichEdit z.B.).

Danke erstmal.
Also ich hab ein Formular als image in das Formular eingefügt. Dann habe ich paar edit felder reingepackt zum ausfüllen, damit ich es drucken kann. wo muss ich denn den befehl

if printdialog1.execute then

einfügen und was kommt nach dem then.

Ich möchte einfach das image mit den edit feldern darauf, welches die ganze oberfläche ausfüllt drucken.
Wie muss da befehl lauten?

Kannst du es mir sagen?

DeddyH 27. Feb 2009 20:07

Re: einfach nur drucken
 
Pack mal einen Button auf Deine Form und versuche Folgendes:
Delphi-Quellcode:
procedure TDeineForm.ButtonPrintClick(Sender: TObject);
begin
  if DeinPrintDialog.Execute then
    print;
end;
Die Namen musst Du natürlich anpassen, das ist ja nur ein Beispiel ;)

fiftyone_88 27. Feb 2009 20:28

Re: einfach nur drucken
 
er druckt zwar jetzt aber es ist viel zu groß dargestellt und so dass er nur ein teil druckt.
wie kann ich die Größe des pics im image ändern. ich kann nur die des images ändern aber wenn ich die größe ändere bleibt aber die größe des pics immer noch so wie vorher so dass er nicht ganz angezeigt wird.
weißt du da weiter???

DeddyH 28. Feb 2009 08:22

Re: einfach nur drucken
 
Das ist abhängig von den Druckerparametern (Seitenränder, Auflösung etc.). Du wirst also das Bild zunächst passend zum Drucker skalieren müssen. Das ist allerdings mit Rechenarbeit verbunden. Du kannst es ja einmal mit diesem Code von den Schweizern versuchen.

DP-Maintenance 28. Feb 2009 08:27

DP-Maintenance
 
Dieses Thema wurde von "Matze" von "Programmieren allgemein" nach "Sonstige Fragen zu Delphi" verschoben.
Delphi-Frage


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:19 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz