From 77a4608ee1f828ed70ec58588f0229cd57758148 Mon Sep 17 00:00:00 2001 From: scuri Date: Tue, 18 Aug 2009 02:21:01 +0000 Subject: *** empty log message *** --- test/lua/show_flower.wlua | 31 ------------------------------- 1 file changed, 31 deletions(-) delete mode 100644 test/lua/show_flower.wlua (limited to 'test/lua/show_flower.wlua') diff --git a/test/lua/show_flower.wlua b/test/lua/show_flower.wlua deleted file mode 100644 index ec97a88..0000000 --- a/test/lua/show_flower.wlua +++ /dev/null @@ -1,31 +0,0 @@ -require"imlua" -require"cdlua" -require"cdluaim" -require"iuplua" -require"iupluacd" - -image = im.FileImageLoad("flower.jpg") -- directly load the image at index 0. it will open and close the file -cnv = iup.canvas{rastersize = image:Width().."x"..image:Height(), border = "NO"} -cnv.image = image -- store the new image in the IUP canvas as an attribute - -function cnv:map_cb() -- the CD canvas can only be created when the IUP canvas is mapped - self.canvas = cd.CreateCanvas(cd.IUP, self) -end - -function cnv:action() -- called everytime the IUP canvas needs to be repainted - self.canvas:Activate() - self.canvas:Clear() - self.image:cdCanvasPutImageRect(self.canvas, 0, 0, 0, 0, 0, 0, 0, 0) -- use default values -end - -dlg = iup.dialog{cnv} - -function dlg:close_cb() - cnv.image:Destroy() - cnv.canvas:Kill() - self:destroy() - return iup.IGNORE -- because we destroy the dialog -end - -dlg:show() -iup.MainLoop() -- cgit v1.2.3