|
Registriert seit: 17. Sep 2006
Ort: Barchfeld
22.787 Beiträge
Delphi XE Professional
|
AW: 2 Proceduren vereinen
13. Apr 2012, 10:41
Quick and Dirty: den Sender auswerten.
Delphi-Quellcode:
if Sender = Drucken1 then
DoPrint := PrintDialog1.Execute
else
DoPrint := true;
if DoPrint then
//Druckbefehl
Detlef Wenn Dein Programm nicht macht, was es soll, nenn es einfach "Version 1.0" 
Delphi programming is cool
|