summaryrefslogtreecommitdiff
path: root/src/fltk_binding/fltk-images.ads
diff options
context:
space:
mode:
authorJed Barber <jjbarber@y7mail.com>2016-10-05 15:44:17 +1100
committerJed Barber <jjbarber@y7mail.com>2016-10-05 15:44:17 +1100
commit116a1589a6b49734f05e5ffdcbe6507470c0da12 (patch)
treee0ecae0095e9dcfc3c226358967e680236261ba0 /src/fltk_binding/fltk-images.ads
parent3b643fb37910c216d921e742ae30471606093ed9 (diff)
Added logo, made find/replace/about windows attention grabbing
Diffstat (limited to 'src/fltk_binding/fltk-images.ads')
-rw-r--r--src/fltk_binding/fltk-images.ads30
1 files changed, 30 insertions, 0 deletions
diff --git a/src/fltk_binding/fltk-images.ads b/src/fltk_binding/fltk-images.ads
new file mode 100644
index 0000000..88d7658
--- /dev/null
+++ b/src/fltk_binding/fltk-images.ads
@@ -0,0 +1,30 @@
+
+
+package FLTK.Images is
+
+
+ type Image is new Wrapper with private;
+
+
+ function Create
+ (Width, Height, Depth : in Natural)
+ return Image;
+
+
+ function Get_W (This : in Image) return Natural;
+ function Get_H (This : in Image) return Natural;
+ function Get_D (This : in Image) return Natural;
+
+
+private
+
+
+ type Image is new Wrapper with null record;
+
+
+ overriding procedure Finalize
+ (This : in out Image);
+
+
+end FLTK.Images;
+