From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me X-Spam-Level: X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00,XPRIO autolearn=ham autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,a4ee0d6fecf1a79a,start X-Google-Attributes: gid103376,public X-Google-ArrivalTime: 2001-05-06 00:50:58 PST Path: newsfeed.google.com!newsfeed.stanford.edu!news.tele.dk!194.255.56.67!newsfeed101.telia.com!kinglear.mobilixnet.dk!news1!news1.global-ip.net!news3.global-ip.net!not-for-mail From: "Per Sandbergs" Newsgroups: comp.lang.ada Subject: GtkAda and tasking how to?. X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 5.00.2919.6700 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6700 Message-ID: Date: Sun, 6 May 2001 09:48:43 +0200 NNTP-Posting-Host: 139.58.231.117 X-Trace: news3.global-ip.net 989135462 139.58.231.117 (Sun, 06 May 2001 09:51:02 MET DST) NNTP-Posting-Date: Sun, 06 May 2001 09:51:02 MET DST Xref: newsfeed.google.com comp.lang.ada:7225 Date: 2001-05-06T09:48:43+02:00 List-Id: Colud somone phelp me with the folowing issue concering GTKAda and tasking. What i want to to is basiclty the folowing: Create a GUI in GtkAda containig a Text box.and som other widgets running as the one Ada-task. I am running Win NT4/2K GNAT 3.14a GTKAda 1.3.11 ------------------------------------------------------------------- with all nececarry units; procedure main is task type Start_Task_type is end tart_Task_type; type Start_Task_Type_ref is access Start_Task_Type; task body Start_Task_type is begin while more_work_to_be_done loop do_some_work; "Update the GUI with text and status": end loop; end; begin declare Server : Start_Task_Type_Ref; begin Gtk.Main.Set_Locale; Gtk.Main.Init; Gtk_New (Server_Main); Show_All (Server_Main); Gdk.Threads.Enter; Server := new Start_Task_Type; Gtk.Main.Main; Gdk.Threads.Leave; end; end Main; ----------------------------------------------------------------