AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Win32/Win64 API (native code) Delphi Manuell Drucker auswählen und drucken???

Manuell Drucker auswählen und drucken???

Offene Frage von "winx"
Ein Thema von winx · begonnen am 29. Mai 2007 · letzter Beitrag vom 29. Mai 2007
Antwort Antwort
winx

Registriert seit: 14. Jun 2005
265 Beiträge
 
#1

Manuell Drucker auswählen und drucken???

  Alt 29. Mai 2007, 11:42
Guten Morgen,

wenn wir bisher etwas mit Delphi drucken wollten, gingen wir immer über die Druckerauswahlbox von Windows:

Delphi-Quellcode:
  if Printdialog.execute then begin
  ...
    Printer.Begindoc;
    Setmapmode(Printer.Canvas.Handle,MM_LOMETRIC);
    ABitmap.drawto(Printer.canvas.handle,0,-ABitmap.height);
    ABitmap.free;
    Printer.Enddoc;
  ...
  end;
Damit wurde der Drucker automatisch richtig gesetzt und es wurde gedruckt.

Wenn ich jedoch nun, ohne diesen Druckerdialoh, also direkt drucken will, funktioniert das nicht:

Delphi-Quellcode:
//Wenn der Druckername leer ist, wird der Standarddrucker verwendet
    if (printerName <> '') then begin

        for i:= 0 to Printers.Printer.Printers.Count - 1 do begin
          if (printerName = Printers.Printer.Printers[i]) then begin
               Printers.Printer.SetPrinter(PAnsiChar(printername),PAnsiChar('WINSPOOL'),PAnsiChar(''),deviceMode);
          end;
        end;
                                                                                    
    end;
Wie muß ich die Funktion

procedure SetPrinter(ADevice: PAnsiChar; ADriver: PAnsiChar; APort: PAnsiChar; ADeviceMode: Cardinal); nutzen, damit ich damit einen Drucker einstellen und dann drucken kann???

Danke,
winx

P.S: Verwende BDS2006
  Mit Zitat antworten Zitat
Benutzerbild von bitsetter
bitsetter

Registriert seit: 17. Jan 2007
1.169 Beiträge
 
Turbo Delphi für Win32
 
#2

Re: Manuell Drucker auswählen und drucken???

  Alt 29. Mai 2007, 13:02
Hi,

vor kurzem hat hier uwewo eine kleine Demo geschrieben, eventuell kannst du dir da ja was abkucken.
Gruß bitsetter
"Viele Wege führen nach Rom"
Wolfgang Mocker (geb. 1954), dt. Satiriker und Aphoristiker
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:10 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