Date: Mon, 19 Jun 2006 10:42:56 +0900 (JST)
Message-Id: <20060619.104256.15589180.garrigue at math.nagoya-u.ac.jp>
To: shamox at gmail.com
Cc: lablgtk at math.nagoya-u.ac.jp
Subject: Re: [LABLGTK] Trouble with message_dialog
From: Jacques Garrigue <garrigue at math.nagoya-u.ac.jp>
In-Reply-To: <d2ee2c5b0606180110g69bcdd1cgd9beb4de5bc62ab8 at mail.gmail.com>
References: <d2ee2c5b0606180110g69bcdd1cgd9beb4de5bc62ab8 at mail.gmail.com>
Mime-Version: 1.0
Content-Transfer-Encoding: quoted-printable
Content-Type: Text/Plain; charset=iso-8859-1
Content-Length: 622

From: "Roland Laur=E8s" <shamox at gmail.com>

> I'm trying to make an error reporting for the user with a message_dia=
log, I
> can display it, but when I click on Close button, the dialog window d=
oesn't
> close itself... Here is the creation code :
> =

> let w =3D GWindow.message_dialog ~message:"No row selected\n Please s=
elect a
> module before trying to edit anything." ~message_type:`ERROR ~buttons=
:
> GWindow.Buttons.close () in
>    w#show ()
> =

> I think of forgot something, but I don't see what...

To close the window, for instance?

You shoud add:

   let res =3D w#run () in
   w#destroy ()

Jacques