瀏覽代碼

Extended graphics flags to Long. Resolves #58.

Brucey 3 年之前
父節點
當前提交
4d83d70748
共有 4 個文件被更改,包括 6 次插入6 次删除
  1. 1 1
      cocoamaxgui.mod/cocoagui.bmx
  2. 2 2
      gtk3maxgui.mod/gtkgadget.bmx
  3. 2 2
      maxgui.mod/gadget.bmx
  4. 1 1
      win32maxguiex.mod/win32maxguiex.bmx

+ 1 - 1
cocoamaxgui.mod/cocoagui.bmx

@@ -924,7 +924,7 @@ Type TNSGadget Extends TGadget
 	
 	
 ' canvas
 ' canvas
 
 
-	Method AttachGraphics:TGraphics( flags )
+	Method AttachGraphics:TGraphics( flags:Long )
 		canvas=brl.Graphics.AttachGraphics( Query(QUERY_NSVIEW_CLIENT),flags )
 		canvas=brl.Graphics.AttachGraphics( Query(QUERY_NSVIEW_CLIENT),flags )
 	End Method
 	End Method
 	
 	

+ 2 - 2
gtk3maxgui.mod/gtkgadget.bmx

@@ -4591,7 +4591,7 @@ End Rem
 Type TGTKCanvas Extends TGTKGadget
 Type TGTKCanvas Extends TGTKGadget
 
 
 	Field canvas:TGraphics
 	Field canvas:TGraphics
-	Field Mode:Int
+	Field Mode:Long
 	
 	
 
 
 	Function CreateCanvas:TGTKCanvas(x:Int, y:Int, w:Int, h:Int, label:String, group:TGadget, style:Int)
 	Function CreateCanvas:TGTKCanvas(x:Int, y:Int, w:Int, h:Int, label:String, group:TGadget, style:Int)
@@ -4642,7 +4642,7 @@ Type TGTKCanvas Extends TGTKGadget
 		PostGuiEvent(EVENT_GADGETPAINT, TGadget(obj))
 		PostGuiEvent(EVENT_GADGETPAINT, TGadget(obj))
 	End Function
 	End Function
 	
 	
-	Method AttachGraphics:TGraphics( flags:Int )
+	Method AttachGraphics:TGraphics( flags:Long )
 		Mode = flags
 		Mode = flags
 	End Method
 	End Method
 
 

+ 2 - 2
maxgui.mod/gadget.bmx

@@ -851,7 +851,7 @@ Type TGadget
 	Method GetProp()
 	Method GetProp()
 	End Method
 	End Method
 ' canvas
 ' canvas
-	Method AttachGraphics:TGraphics( flags )
+	Method AttachGraphics:TGraphics( flags:Long )
 	End Method
 	End Method
 	Method CanvasGraphics:TGraphics()
 	Method CanvasGraphics:TGraphics()
 	End Method
 	End Method
@@ -1108,7 +1108,7 @@ Type TProxyGadget Extends TGadget
 		Return proxy.SetPixmap(pixmap,flags)
 		Return proxy.SetPixmap(pixmap,flags)
 	End Method
 	End Method
 ' canvas
 ' canvas
-	Method AttachGraphics:TGraphics( flags )
+	Method AttachGraphics:TGraphics( flags:Long )
 		Return proxy.AttachGraphics( flags )
 		Return proxy.AttachGraphics( flags )
 	End Method
 	End Method
 	Method CanvasGraphics:TGraphics()
 	Method CanvasGraphics:TGraphics()

+ 1 - 1
win32maxguiex.mod/win32maxguiex.bmx

@@ -3798,7 +3798,7 @@ Type TWindowsPanel Extends TWindowsGadget
 		RedrawGadget(Self)
 		RedrawGadget(Self)
 	EndMethod
 	EndMethod
 
 
-	Method AttachGraphics:TGraphics( flags )
+	Method AttachGraphics:TGraphics( flags:Long )
 		_canvas=brl.Graphics.AttachGraphics( _hwnd,flags )
 		_canvas=brl.Graphics.AttachGraphics( _hwnd,flags )
 	EndMethod
 	EndMethod