Salut Amicalement >Salut Herberth,
>Public Sub Button1_Click() > Dim i As Integer > HSplit1.Children.Clear > For i = 1 To 2 > hToggle = New Button(HSplit1) > hToggle.Text = "T" & i > hToggle.Picture = Picture["icon:/32/add"] > Next > hToggle.AutoResize = True >End >This works for me. >But how you want to distinguish your buttons. -- >Amicalement >Charlie I drown in a glass of water. Your solution works well for me. Super. This is what I needed. Regards and thanks ------------------------------------------------------------------------------ Monitor 25 network devices or servers for free with OpManager! OpManager is web-based network management software that monitors network devices and physical & virtual servers, alerts via email & sms for fault. Monitor 25 devices for free with no restriction. Download now http://ad.doubleclick.net/ddm/clk/292181274;119417398;o _______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user