guile-gtk-general
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: gtk.notebook example


From: Max
Subject: Re: gtk.notebook example
Date: Thu, 24 Apr 2014 15:54:23 +0200
User-agent: Mozilla/5.0 (X11; Linux x86_64; rv:24.0) Gecko/20100101 Thunderbird/24.4.0

23.04.2014 19:01, Patrick Bernaud пишет:
>
> There is a <gtk-notebook> in the loader for GTK demos
> (gtk/examples/guile-gtk-demo/guile-gtk-demo.scm).
>

Well, that's good but far from being simple or concise. I've tried to extract 
simple
example but following code fails to compile:

 (use-modules (oop goops) (gnome gobject) (gnome gtk) (gnome gobject utils))

(define notebook (make <gtk-notebook>))

(define (hello)
  (let* ((window (make <gtk-window> #:type 'toplevel))
     (append-page notebook scrolled
              (make <gtk-label> :label name :use-underline #t)))
    (set-border-width window 10)
    (show-all window)
    (gtk-main)))

(hello)

Any ideas why? Shall I add created notebook to some top-level window?

thanks,
Max.




reply via email to

[Prev in Thread] Current Thread [Next in Thread]