From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on
	ip-172-31-65-14.ec2.internal
X-Spam-Level: 
X-Spam-Status: No, score=-3.2 required=3.0 tests=BAYES_00,NICE_REPLY_A,
	T_SCC_BODY_TEXT_LINE autolearn=ham autolearn_force=no version=3.4.6
Date: Sun, 16 Oct 2022 18:43:17 +0200
MIME-Version: 1.0
User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:102.0) Gecko/20100101
 Thunderbird/102.3.3
Subject: Re: Gtk in ada using radiobuttons
Content-Language: en-GB
Newsgroups: comp.lang.ada
References: <nnd$0c6be124$11646b54@413dc7685a372cde>
From: ldries46 <bertus.dries@planet.nl>
In-Reply-To: <nnd$0c6be124$11646b54@413dc7685a372cde>
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 8bit
Message-ID: <nnd$5fe828a6$33713fd0@615a1ebc43f00050>
Organization: KPN B.V.
Path: eternal-september.org!reader01.eternal-september.org!news.mixmin.net!newsreader4.netcologne.de!news.netcologne.de!peer01.ams1!peer.ams1.xlned.com!news.xlned.com!peer02.ams4!peer.am4.highwinds-media.com!news.highwinds-media.com!feed.abavia.com!abe006.abavia.com!abp002.abavia.com!news.kpn.nl!not-for-mail
Injection-Date: Sun, 16 Oct 2022 18:43:19 +0200
Injection-Info: news.kpn.nl; mail-complaints-to="abuse@kpn.com"
X-Received-Bytes: 2474
Xref: reader01.eternal-september.org comp.lang.ada:64509
List-Id: <comp.lang.ada>

Op 15-10-2022 om 16:28 schreef ldries46:
> I realized a set of two radiobuttons that should operate in a group, 
> either one or the other but I cannot find the correct way to combine 
> these two radio buttons although I can see the dialog in which they 
> are used. only both buttons are on and clicking on them cannot set 
> either of the off. I tried to find an example how to do this on 
> internet.  I just send the used files along. Can anybody help me.
>
>
As far as I can read in gtk-radio_button.ads the followinf dtatements 
should do the trick:

       TypeDialog.Radio_Frame := Widget_SList.Null_List;
       TypeDialog.Radio_Header := 
Gtk_Radio_Button_New_With_Label(TypeDialog.Radio_Frame,To_String(Ext_C_Header(lan)));
       TypeDialog.Radio_CPP := 
Gtk_Radio_Button_New_With_Label(TypeDialog.Radio_Frame, 
To_String(Ext_CPP_Header(lan)));

       Pack_Start
         (TypeDialog.Radio_Button_Box,
          TypeDialog.Radio_Header,
          Expand  => True,
          Fill    => True,
          Padding => 0);
       Pack_Start
         (TypeDialog.Radio_Button_Box,
          TypeDialog.Radio_CPP,
          Expand  => True,
          Fill    => True,
          Padding => 1);

But the dialog looks good with the exception that both buttons are 
activated and cannot be deactivated. I still do want the choice between 
the two I cannot find that in the When running in debugging mode I can 
see that the group still is null