1Prima::Dialog::PrintDiaUlsoegr(3C)ontributed Perl DocumePnrtiamtai:o:nDialog::PrintDialog(3)
2
3
4
6 Prima::Dialog::PrintDialog - standard printer setup dialog
7
9 Provides a standard dialog that allows the user to select a printer and
10 its options. The toolkit does not provide the in-depth management of
11 the printer options; this can only be accessed by executing a printer-
12 specific setup window, called by "Prima::Printer::setup_dialog". The
13 class invokes this method when the user presses 'Properties' button.
14 Otherwise, the class provides only selection of a printer from the
15 printer list.
16
17 When the dialog finished successfully, the selected printer is set as
18 the current by writing to "Prima::Printer::printer" property. This
19 technique allows direct use of the user-selected printer and its
20 properties without prior knowledge of the selection process.
21
23 use Prima qw(Dialog::PrintDialog Application);
24
25 my $dlg = Prima::Dialog::PrintDialog-> new;
26 if ( $dlg-> execute) {
27 my $p = $dlg-> printer;
28 if ( $p-> begin_doc ) {
29 $p-> text_out( 'Hello world', 10, 10);
30 $p-> end_doc;
31 }
32 }
33 $dlg-> destroy;
34
36 Dmitry Karasik, <dmitry@karasik.eu.org>.
37
39 Prima, Prima::Window, Prima::Printer.
40
41
42
43perl v5.32.1 2021-01-27 Prima::Dialog::PrintDialog(3)