public inbox for guile-gtk@sourceware.org
 help / color / mirror / Atom feed
* where is gtk-window-set-modal?
@ 2000-11-03 18:23 Thomas Bushnell, BSG
  2000-11-04 11:39 ` Marius Vollmer
  0 siblings, 1 reply; 2+ messages in thread
From: Thomas Bushnell, BSG @ 2000-11-03 18:23 UTC (permalink / raw)
  To: guile-gtk

Where is gtk-window-set-modal?  How can I turn that on

^ permalink raw reply	[flat|nested] 2+ messages in thread

* Re: where is gtk-window-set-modal?
  2000-11-03 18:23 where is gtk-window-set-modal? Thomas Bushnell, BSG
@ 2000-11-04 11:39 ` Marius Vollmer
  0 siblings, 0 replies; 2+ messages in thread
From: Marius Vollmer @ 2000-11-04 11:39 UTC (permalink / raw)
  To: Thomas Bushnell, BSG; +Cc: guile-gtk

tb@becket.net (Thomas Bushnell, BSG) writes:

> Where is gtk-window-set-modal?  How can I turn that on

gtk-window-set-modal is right there, along with the other functions.
You would use it like this:

    (use-modules (gtk gtk))

    (define (annoy)
      (let ((d (gtk-window-new 'dialog))
	    (b (gtk-button-new-with-label "click me")))
	(gtk-signal-connect b "clicked" (lambda () (gtk-object-destroy d)))
	(gtk-container-add d b)
	(gtk-window-set-modal d #t)
        (gtk-widget-show-all d)))

    (let ((w (gtk-window-new 'dialog))
	  (b (gtk-button-new-with-label "annoy me")))
      (gtk-signal-connect b "clicked" annoy)
      (gtk-container-add w b)
      (gtk-widget-show-all w)
      (gtk-standalone-main w))

^ permalink raw reply	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2000-11-04 11:39 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2000-11-03 18:23 where is gtk-window-set-modal? Thomas Bushnell, BSG
2000-11-04 11:39 ` Marius Vollmer

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).