Einzelnen Beitrag anzeigen

m-werk

Registriert seit: 14. Jun 2002
215 Beiträge
 
Delphi 2009 Architect
 
#1

2 Proceduren vereinen

  Alt 13. Apr 2012, 11:37
Hallo,

ich habe in meinem Formular einen Button, der einen Druckbefehl aufruft OHNE dass das Druckermenü erscheint wo ich den Drucker auswählen kann

Code:
procedure THaupt_Form.BtnPrintClick(Sender: TObject);
var rec : TRect;
begin
 //druckbefehl
end;
In meinem Menü habe ich auch einen Druckbutton, der den gleichen Druckbefehl aufruft, nur dass man dort die Möglichkeit hat, den Drucker auszuwählen:
Code:
procedure THaupt_Form.Drucken1Click(Sender: TObject);
var rec : TRect;
begin
if PrintDialog1.Execute then
  begin
    //druckbefehl
  end;
end;
Ich möchte gerne NUR einen Druckbefehl verwenden, und je nach dem welchen Button der User anklickt, soll der Druckbefehl ausgeführt werden. Entweder mit oder ohne PrintDialog.
Grüße, m-werk
  Mit Zitat antworten Zitat