gtkaccelgroup.zc

来自「实现树形结构」· ZC 代码 · 共 50 行

import "glib/glib"
import "glib/glib-object"
import "gdk/gdk"
import "gtk/gtkobject"
import "gtk/gtkenums"

public [name="c"]

enum GtkAccelFlags
  GTK_ACCEL_VISIBLE        = 1 << 0
  GTK_ACCEL_LOCKED         = 1 << 1
  GTK_ACCEL_MASK           = 0x07
end

struct GtkAccelGroup : local GObject; end
struct GtkAccelGroupClass : local GObjectClass; end

typedef GtkAccelGroupActivate =  {GtkAccelGroup, GObject, guint, GdkModifierType} gboolean

struct GtkAccelKey
  accel_key: guint
  accel_mods: GdkModifierType
  //accel_flags: guint
end

import func gtk_accel_group_get_type: GType
import func gtk_accel_group_new: GtkAccelGroup
import func gtk_accel_group_lock		  (GtkAccelGroup)
import func gtk_accel_group_unlock		  (GtkAccelGroup)

import func gtk_accel_group_connect (
				GtkAccelGroup, 
				guint, 
				GdkModifierType,
				GtkAccelFlags,
				GClosure)

import func gtk_accel_group_connect_by_path (GtkAccelGroup,[] gchar,GClosure)
import func gtk_accel_group_disconnect (GtkAccelGroup,GClosure): gboolean
import func gtk_accel_group_disconnect_key (GtkAccelGroup,guint,GdkModifierType): gboolean

struct GtkAccelGroupEntry
	key: GtkAccelKey
	closure: GClosure
//	accel_path_quark: GQuark
end

end