Einzelnen Beitrag anzeigen

Benutzerbild von guinnes
guinnes

Registriert seit: 28. Feb 2007
Ort: Bottrop
265 Beiträge
 
Delphi 5 Enterprise
 
#18

AW: 2 Proceduren vereinen

  Alt 13. Apr 2012, 14:01
Der Unterschied zwischen Beitrag #1 und Beitrag #11 ist, dass er nur einmal die Funktion Druckbefehl pflegen muss.
Das ist mir schon klar. Aber, was ist im Beitrag 1 "Druckbefehl" ? Ein einfaches print ? Dann wäre eine eigene Methode eher überflüssig.
Delphi-Quellcode:
procedure THaupt_Form.BtnPrintClick(Sender: TObject);
var rec : TRect;
begin
 //druckbefehl
end;
Delphi-Quellcode:
procedure THaupt_Form.Drucken1Click(Sender: TObject);
var rec : TRect;
begin
if PrintDialog1.Execute then
  begin
    //druckbefehl
  end;
end;
Glückauf
  Mit Zitat antworten Zitat