* a few more functions
@ 2003-01-20 23:39 Kevin Ryde
0 siblings, 0 replies; 2+ messages in thread
From: Kevin Ryde @ 2003-01-20 23:39 UTC (permalink / raw)
To: guile-gtk
[-- Attachment #1: Type: text/plain, Size: 727 bytes --]
While tinkering with various stuff I found uses for the following,
* gdk-1.2.defs (GdkFont): Add ascent and descent fields.
(gdk_window_get_events, gdk_window_at_pointer, gdk_window_get_pointer,
gdk_window_raise, gdk_window_set_background,
gdk_window_set_back_pixmap, gdk_window_set_events): New functions.
* gtk-1.2.defs (GtkTreeItem): Add expanded field
(GtkMenuItem): Add submenu field.
(gtk_window_add_accel_group, gtk_window_remove_accel_group,
gtk_toggle_button_get_active): New functions.
GtkToggleButton has "active" as a field as well as a get_active
function (in both gtk 1.2 and 2.0). The gtk 2 doco doesn't mention
the field though, so it might be best to use the function.
[-- Attachment #2: gtk-1.2.defs.misc.diff --]
[-- Type: text/plain, Size: 1137 bytes --]
--- gtk-1.2.defs.~1.6.~ 2003-01-05 06:01:11.000000000 +1000
+++ gtk-1.2.defs 2003-01-12 14:43:05.000000000 +1000
@@ -964,7 +964,9 @@
;; TreeItem
-(define-object GtkTreeItem (GtkItem))
+(define-object GtkTreeItem (GtkItem)
+ (fields
+ (bool expanded)))
(define-func gtk_tree_item_new
GtkWidget
@@ -1542,6 +1544,16 @@
;; ((GtkWindow window)
;; (GtkAcceleratorTable table)))
+(define-func gtk_window_add_accel_group
+ none
+ ((GtkWindow window)
+ (GtkAccelGroup accel_group)))
+
+(define-func gtk_window_remove_accel_group
+ none
+ ((GtkWindow window)
+ (GtkAccelGroup accel_group)))
+
(define-func gtk_window_position
none
((GtkWindow window)
@@ -1975,6 +1987,10 @@
((GtkToggleButton toggle_button)
(bool draw_indicator)))
+(define-func gtk_toggle_button_get_active
+ bool
+ ((GtkToggleButton toggle_button)))
+
(define-func gtk_toggle_button_set_state
none
((GtkToggleButton toggle_button)
@@ -2665,7 +2681,9 @@
;; MenuItem
-(define-object GtkMenuItem (GtkItem))
+(define-object GtkMenuItem (GtkItem)
+ (fields
+ (GtkWidget submenu)))
(define-func gtk_menu_item_new
GtkWidget
[-- Attachment #3: gdk-1.2.defs.misc.diff --]
[-- Type: text/plain, Size: 1427 bytes --]
--- gdk-1.2.defs.~1.3.~ 2002-12-08 04:25:58.000000000 +1000
+++ gdk-1.2.defs 2003-01-19 18:18:38.000000000 +1000
@@ -339,7 +339,9 @@
(define-boxed GdkFont
(copy gdk_font_ref)
(free gdk_font_unref)
- (conversion "sgtk_font_conversion"))
+ (conversion "sgtk_font_conversion")
+ (fields (int ascent)
+ (int descent)))
(add-options GdkFont (conversion "sgtk_font_conversion"))
@@ -810,10 +812,19 @@
GdkDragContext
((GdkEvent event)))
+(define-func gdk_window_get_events
+ GdkEventMask
+ ((GdkWindow window)))
+
(define-func gdk_get_leader_window_id
uint
())
+(define-func gdk_window_at_pointer
+ (GdkWindow (values (x y)))
+ ((int x)
+ (int y)))
+
(define-func gdk_window_get_id
uint
((GdkWindow window)))
@@ -832,6 +843,33 @@
GdkWindow
((GdkWindow window)))
+(define-func gdk_window_get_pointer
+ (GdkWindow (values (x y modifiers)))
+ ((GdkWindow window)
+ (int x)
+ (int y)
+ (GdkModifierType modifiers)))
+
+(define-func gdk_window_raise
+ none
+ ((GdkWindow window)))
+
+(define-func gdk_window_set_background
+ none
+ ((GdkWindow window)
+ (GdkColor color)))
+
+(define-func gdk_window_set_back_pixmap
+ none
+ ((GdkWindow window)
+ (GdkPixmap pixmap (null-ok))
+ (bool parent_relative)))
+
+(define-func gdk_window_set_events
+ none
+ ((GdkWindow window)
+ (GdkEventMask events)))
+
;;; glib functions - timer
(define-func g_timer_new
^ permalink raw reply [flat|nested] 2+ messages in thread
* Re: a few more functions
@ 2003-01-22 17:54 Daniel Skarda
0 siblings, 0 replies; 2+ messages in thread
From: Daniel Skarda @ 2003-01-22 17:54 UTC (permalink / raw)
To: guile-gtk; +Cc: Kevin Ryde
Hello,
thank you for you patch.
Beside applying your patch, I also deprecated gtk-toggle-button-set-state (in
in favor of -set-active version) and removed exclamation mark from field setters
(I wrote about the removal last time).
0.
> * gdk-1.2.defs (GdkFont): Add ascent and descent fields.
> (gdk_window_get_events, gdk_window_at_pointer, gdk_window_get_pointer,
> gdk_window_raise, gdk_window_set_background,
> gdk_window_set_back_pixmap, gdk_window_set_events): New functions.
>
> * gtk-1.2.defs (GtkTreeItem): Add expanded field
> (GtkMenuItem): Add submenu field.
> (gtk_window_add_accel_group, gtk_window_remove_accel_group,
> gtk_toggle_button_get_active): New functions.
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2003-01-22 17:54 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2003-01-20 23:39 a few more functions Kevin Ryde
2003-01-22 17:54 Daniel Skarda
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).