Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Rhinorhino on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
results from print dialog
- Thread starter pconrad
- Start date
Hi,
this code will capture the result of the Ok & cancel button on the printerdialog.If the user presses Ok the result is true, in all other cases result will be false.
procedure TForm1.Button1Click(Sender: TObject);
var
Result: boolean;
begin
Result := PrintDialog1.Execute;
if Result then
showmessage('Print something')
else
showmessage('Canceled')
end;
Steph [Bigglasses]
this code will capture the result of the Ok & cancel button on the printerdialog.If the user presses Ok the result is true, in all other cases result will be false.
procedure TForm1.Button1Click(Sender: TObject);
var
Result: boolean;
begin
Result := PrintDialog1.Execute;
if Result then
showmessage('Print something')
else
showmessage('Canceled')
end;
Steph [Bigglasses]
- Thread starter
- #3
- Status
Similar threads
- Locked
- Question
