Re: [Gambas-user] Arrays of controls

2011-09-23 Thread Benoît Minisini
Hi Benoit, first, I was not very amused about beeing rejected with my project allthough you had asked for it, I don't know why it prints no reason. This is an automatic mailing-list rule that rejects all mails greater than 256K. There is a limit because there is 800 people on the

Re: [Gambas-user] Arrays of controls

2011-09-23 Thread Dag-Jarle Johansen
Ok, that makes it understandable and has sense. Sorry for that, loose nerves sometimes. I will send you the packages from yesterday, nothing has changed since then. Regards, Dag-Jarle 2011/9/23 Benoît Minisini gam...@users.sourceforge.net Hi Benoit, first, I was not very amused about

Re: [Gambas-user] Arrays of controls

2011-08-28 Thread tobias
hi, I do not check this at all: Public Sub Page_First_Init() Dim hPictureBox As PictureBox Dim I As Integer For i = 0 To 9 hPictureBox = New PictureBox(Me) As PBX hPictureBox.Tag = i Next End ok, you have a loop from 0 to 9 in which you create

Re: [Gambas-user] Arrays of controls

2011-08-28 Thread Benoît Minisini
Hi out there, I do not check this at all: Public Sub Page_First_Init() Dim hPictureBox As PictureBox Dim I As Integer For i = 0 To 9 hPictureBox = New PictureBox(Me) As PBX hPictureBox.Tag = i Next End Seems to work. But how do I call one of this

[Gambas-user] Arrays of controls

2011-08-27 Thread Dag-Jarle Johansen
Hi out there, I do not check this at all: Public Sub Page_First_Init() Dim hPictureBox As PictureBox Dim I As Integer For i = 0 To 9 hPictureBox = New PictureBox(Me) As PBX hPictureBox.Tag = i Next End Seems to work. But how do I call one of this bitmaps, for

[Gambas-user] Arrays of controls..

2011-02-11 Thread Stephen Bungay
Given the following code (Gambas 2.22) PUBLIC SUB Form_Open() DIM X AS Integer DIM ButtonArray[10] AS Object FOR X = 0 TO 9 ButtonArray[X] = NEW Button(ME) WITH ButtonArray[X] .X = 90 + (20 * x) .Y = 100 .Width = 20

Re: [Gambas-user] Arrays of controls..

2011-02-11 Thread Matti
First, put the buttons in a group that can catch events: ButtonArray[X] = NEW Button(ME) as Buttons Then, give every button an individual Tag: .height = 20 .Tag = X And the event to see which one is clicked: Public Sub Buttons_Click() ' reacts to all the buttons Dim

Re: [Gambas-user] Arrays of controls..

2011-02-11 Thread Stephen Bungay
Hi Matti! Thanks for the reply. OK, that also works when everything is all on in the one form class. Let me clarify. We have two forms, FMain and FormButtons. FMain has on it a TabStrip container (TabStrip1) and nothing else. FormButtons has on it one (1) Toggle Button called

Re: [Gambas-user] Arrays of controls..

2011-02-11 Thread EA7DFH
El 11/02/11 21:18, Stephen Bungay escribió: snipped ' This one does not trap PRIVATE SUB ToggleButtons_click() STOP END the click event ToggleButtons_click fires (this does NOT happen). Well, I think you *must* declare as PUBLIC this method to work. PUBLIC SUB

Re: [Gambas-user] Arrays of controls..

2011-02-11 Thread Stephen Bungay
Yes it worked. I'm just so used to typing PRIVATE SUB ... that I gapped it and then couldn't see the forest for the darn trees in the way. On 02/11/2011 04:00 PM, EA7DFH wrote: El 11/02/11 21:18, Stephen Bungay escribió: snipped ' This one does not trap PRIVATE SUB