summaryrefslogtreecommitdiff
path: root/spec/fltk-devices-surface-paged-printers.ads
diff options
context:
space:
mode:
Diffstat (limited to 'spec/fltk-devices-surface-paged-printers.ads')
-rw-r--r--spec/fltk-devices-surface-paged-printers.ads12
1 files changed, 12 insertions, 0 deletions
diff --git a/spec/fltk-devices-surface-paged-printers.ads b/spec/fltk-devices-surface-paged-printers.ads
index c0bc34e..b9c0169 100644
--- a/spec/fltk-devices-surface-paged-printers.ads
+++ b/spec/fltk-devices-surface-paged-printers.ads
@@ -42,6 +42,8 @@ package FLTK.Devices.Surface.Paged.Printers is
+ -- Static Attributes --
+
function Get_Dialog_Title
return String;
@@ -159,6 +161,8 @@ package FLTK.Devices.Surface.Paged.Printers is
+ -- Driver --
+
-- Not currently implemented
function Get_Original_Driver
(This : in out Printer)
@@ -167,6 +171,8 @@ package FLTK.Devices.Surface.Paged.Printers is
+ -- Job Control --
+
procedure Start_Job
(This : in out Printer;
Count : in Natural := 0);
@@ -188,6 +194,8 @@ package FLTK.Devices.Surface.Paged.Printers is
+ -- Spacing and Orientation --
+
procedure Get_Margins
(This : in Printer;
Left, Top, Right, Bottom : out Integer);
@@ -226,6 +234,8 @@ package FLTK.Devices.Surface.Paged.Printers is
+ -- Printing --
+
procedure Print_Widget
(This : in out Printer;
Item : in FLTK.Widgets.Widget'Class;
@@ -240,6 +250,8 @@ package FLTK.Devices.Surface.Paged.Printers is
+ -- Printer --
+
procedure Set_Current
(This : in out Printer);