Ups, GetRawOwnedObject already returns an IntPtr
This commit is contained in:
parent
24f3d17d5c
commit
354c8e8cf7
12 changed files with 12 additions and 12 deletions
|
@ -13,7 +13,7 @@ namespace GtkNamespace
|
|||
|
||||
public MainWindow() : this(new Builder("MainWindow.glade")) { }
|
||||
|
||||
private MainWindow(Builder builder) : base(builder.GetRawOwnedObject("MainWindow").Handle)
|
||||
private MainWindow(Builder builder) : base(builder.GetRawOwnedObject("MainWindow"))
|
||||
{
|
||||
builder.Autoconnect(this);
|
||||
|
||||
|
|
|
@ -8,7 +8,7 @@ namespace GtkNamespace
|
|||
{
|
||||
public Gtk_Dialog() : this(new Builder("Gtk_Dialog.glade")) { }
|
||||
|
||||
private Gtk_Dialog(Builder builder) : base(builder.GetRawOwnedObject("Gtk_Dialog").Handle)
|
||||
private Gtk_Dialog(Builder builder) : base(builder.GetRawOwnedObject("Gtk_Dialog"))
|
||||
{
|
||||
builder.Autoconnect(this);
|
||||
DefaultResponse = ResponseType.Cancel;
|
||||
|
|
|
@ -8,7 +8,7 @@ namespace GtkNamespace
|
|||
{
|
||||
public Gtk_Widget() : this(new Builder("Gtk_Widget.glade")) { }
|
||||
|
||||
private Gtk_Widget(Builder builder) : base(builder.GetRawOwnedObject("Gtk_Widget").Handle)
|
||||
private Gtk_Widget(Builder builder) : base(builder.GetRawOwnedObject("Gtk_Widget"))
|
||||
{
|
||||
builder.Autoconnect(this);
|
||||
}
|
||||
|
|
|
@ -8,7 +8,7 @@ namespace GtkNamespace
|
|||
{
|
||||
public Gtk_Window() : this(new Builder("Gtk_Window.glade")) { }
|
||||
|
||||
private Gtk_Window(Builder builder) : base(builder.GetRawOwnedObject("Gtk_Window").Handle)
|
||||
private Gtk_Window(Builder builder) : base(builder.GetRawOwnedObject("Gtk_Window"))
|
||||
{
|
||||
builder.Autoconnect(this);
|
||||
}
|
||||
|
|
|
@ -3,7 +3,7 @@ namespace GtkNamespace
|
|||
open Gtk
|
||||
|
||||
type MainWindow (builder : Builder) as this =
|
||||
inherit Window(builder.GetRawOwnedObject("MainWindow").Handle)
|
||||
inherit Window(builder.GetRawOwnedObject("MainWindow"))
|
||||
|
||||
let mutable _label1 : Label = null
|
||||
let mutable _button1 : Button = null
|
||||
|
|
|
@ -3,7 +3,7 @@ namespace GtkNamespace
|
|||
open Gtk
|
||||
|
||||
type Gtk_Dialog (builder : Builder) as this =
|
||||
inherit Dialog(builder.GetRawOwnedObject("Gtk_Dialog").Handle)
|
||||
inherit Dialog(builder.GetRawOwnedObject("Gtk_Dialog"))
|
||||
do
|
||||
this.DefaultResponse <- ResponseType.Cancel;
|
||||
this.Response.Add(fun _ ->
|
||||
|
|
|
@ -3,6 +3,6 @@ namespace GtkNamespace
|
|||
open Gtk
|
||||
|
||||
type Gtk_Widget (builder : Builder) =
|
||||
inherit Box(builder.GetRawOwnedObject("Gtk_Widget").Handle)
|
||||
inherit Box(builder.GetRawOwnedObject("Gtk_Widget"))
|
||||
|
||||
new() = new Gtk_Widget(new Builder("Gtk_Widget.glade"))
|
||||
|
|
|
@ -3,6 +3,6 @@ namespace GtkNamespace
|
|||
open Gtk
|
||||
|
||||
type Gtk_Window (builder : Builder) =
|
||||
inherit Window(builder.GetRawOwnedObject("Gtk_Window").Handle)
|
||||
inherit Window(builder.GetRawOwnedObject("Gtk_Window"))
|
||||
|
||||
new() = new Gtk_Window(new Builder("Gtk_Window.glade"))
|
||||
|
|
|
@ -11,7 +11,7 @@ Namespace GtkNamespace
|
|||
<UI>Private _button1 As Button
|
||||
|
||||
Public Sub New (builder as Builder)
|
||||
MyBase.New(builder.GetRawOwnedObject("MainWindow").Handle)
|
||||
MyBase.New(builder.GetRawOwnedObject("MainWindow"))
|
||||
|
||||
builder.Autoconnect (Me)
|
||||
|
||||
|
|
|
@ -7,7 +7,7 @@ Namespace GtkNamespace
|
|||
Inherits Dialog
|
||||
|
||||
Public Sub New (builder as Builder)
|
||||
MyBase.New (builder.GetRawOwnedObject("Gtk_Dialog").Handle)
|
||||
MyBase.New (builder.GetRawOwnedObject("Gtk_Dialog"))
|
||||
|
||||
builder.Autoconnect (Me)
|
||||
DefaultResponse = ResponseType.Cancel
|
||||
|
|
|
@ -7,7 +7,7 @@ Namespace GtkNamespace
|
|||
Inherits Box
|
||||
|
||||
Public Sub New (builder as Builder)
|
||||
MyBase.New (builder.GetRawOwnedObject("Gtk_Widget").Handle)
|
||||
MyBase.New (builder.GetRawOwnedObject("Gtk_Widget"))
|
||||
|
||||
builder.Autoconnect (Me)
|
||||
End Sub
|
||||
|
|
|
@ -7,7 +7,7 @@ Namespace GtkNamespace
|
|||
Inherits Window
|
||||
|
||||
Public Sub New (builder as Builder)
|
||||
MyBase.New (builder.GetRawOwnedObject("Gtk_Window").Handle)
|
||||
MyBase.New (builder.GetRawOwnedObject("Gtk_Window"))
|
||||
|
||||
builder.Autoconnect (Me)
|
||||
End Sub
|
||||
|
|
Loading…
Reference in a new issue