[gtkada] Using Gdk.Threads

Rick Duley 30294025 at student.murdoch.edu.au
Tue Jul 12 09:17:26 CEST 2005


Hi folks

Following the GtkAda User's Guide I have created the following task to run the
GUI for my application.

with Gtk.Main;
with Gdk.Threads;

with Analyst.Signal;
with Analyse60_Window_Pkg;

package body Analyst.GUI is
   task body GUI_Type
   is
      GUI        : Analyse60_Window_Pkg.Analyse60_Window_Access;
      Signal_Box : Analyst.Signal.Box_Access_Type;  -- Protected Type.
   begin

      -- Initialise access to the protected type.
      accept Initialise
        (Signals : in     Analyst.Signal.Box_Access_Type)
      do
         Signal_Box := Signals;
      end Initialise;

      -- This line is not in the User Guide Version.
      Gtk.Main.Set_Locale;

      Gdk.Threads.G_Init;
      Gdk.Threads.Init;
      Gtk.Main.Init;

      Analyse60_Window_Pkg.Gtk_New(Analyse60_Window => GUI,
                                   Signal_Box       => Signal_Box);
      Analyse60_Window_Pkg.Show_All(Widget => GUI);

      Gdk.Threads.Enter;
      Gtk.Main.Main;
      Gdk.Threads.Leave;

   end GUI_Type;

On compilation with GNAT GAP 1.1.0 (20041209-323) I get the error message:

"The procedure entry point g_convert_init could not be located in the dynamic
link library libglib-2.0-0.dll"

This library is in C:\GtkAda-2.4.0\bin which is listed in PATH.

Do I have something wrong?  What can I do to correct this?

Thanks

--------------------------------------------
 "If you stumble along the way
        at least you were going someplace."
--------------------------------------------
Rick Duley
School of Engineering Science
Murdoch University, Perth,
Western Australia                    .-_|\
http://eng.murdoch.edu.au/~rick     /     \
aussie :    0409 106 049      perth *_.-._/
o'seas : +61 409 106 049                 v






More information about the gtkada mailing list