You are not logged in.

Dear visitor, welcome to Jabaco - Community. If this is your first visit here, please read the Help. It explains in detail how this page works. To use all features of this page, you should consider registering. Please use the registration form, to register here or read more information about the registration process. If you are already registered, please login here.

amitmarkel

Beginner

  • "amitmarkel" is male
  • "amitmarkel" started this thread

Posts: 17

Date of registration: Jul 17th 2009

  • Send private message

1

Monday, July 20th 2009, 10:17am

Control arrays LBound

Hi community, Manuel,

I've tried to LBound and UBound control arrays. Whereas UBound works, I think there is a bug with LBound.
I've created a PictureBox array of Picbx(1) and Picbx(2) for example, and other controls such as labels. LBound seems to always result with a zero.

I tried to do it in this fashion:

Jabaco Source

 
1

Msgbox LBound(Picbx) & UBound(Picbx)


The result is 02, where in VB6 the result is 12.

Regards
Amit

This post has been edited 1 times, last edit by "amitmarkel" (Jul 20th 2009, 10:23am)

OlimilO

Intermediate

  • "OlimilO" is male

Posts: 277

Date of registration: Jan 18th 2009

Location: Germany

Occupation: software engineer

  • Send private message

2

Monday, July 20th 2009, 11:57am

Load & Iterating

Hi Amit,
before you dig more deeper:
Also loading new controls into controlarrays with the Load-procedure is not possible until now.
There is plenty of work left for Manuel ;)
For compiler related stuff the only help we can serve is posting problems together with solutions

The LBound and UBound-functions normally will be used for iterating through the array.

But since we have For Each you could do it like this:
VB6-Code:

Jabaco Source

 
1
2
3
4
5
6

Dim pic As PictureBox   
   For Each pic In Picture1
      If Not pic Is Nothing Then
         pic.BackColor = vbWhite
      End If
   Next


Jabaco-Code:

Jabaco Source

 
1
2
3
4
5
6

Dim pic As PictureBox   
   For Each pic In Picture1
      If pic <> Nothing Then
         pic.BackColor = vbWhite
      End If
   Next




OlimilO

amitmarkel

Beginner

  • "amitmarkel" is male
  • "amitmarkel" started this thread

Posts: 17

Date of registration: Jul 17th 2009

  • Send private message

3

Monday, July 20th 2009, 4:11pm

Yeah I know: I just thought that solution could be a little "less elegant" if a LBound function already existed. Thanks however. Next times I'll include any bypassing solutions :), I thought it just might have been a simple bug.

I am sharing my thoughts in goal to help improve Jabaco because in the future it will be powerful, and I wish to aid in bringing that closer. I yet learnt Jabaco and the framework Fully to help with solutions (regarding bugs or suggestions) or assisting in writing documentation, therefore in the meantime I posted bugs I've encountered.

Also -- The forum will be a great foundation of a "MSDN" base!

Amit

This post has been edited 2 times, last edit by "amitmarkel" (Jul 20th 2009, 7:12pm)

A1880

Intermediate

  • "A1880" is male

Posts: 500

Date of registration: Jan 1st 2009

Location: Hanover, Germany

Occupation: Software Engineer

Hobbies: Hilbert Curves

  • Send private message

4

Monday, July 20th 2009, 7:39pm

Hi,
looking through the de-compiled code of an array-of-controls sample, I've found that LBound() is actually correct returning 0.
The error is that the array is always created with LBound() 0 in the first place regardless of the index figures declared in the form.
So, an easy workaround is to actually use a zero-based index interval 0..n
If you do insist on a non-zero limit, you can use something like "Redim Preserve Command1(11 To 12)" in your Form1.Load() routine.

For Manuel's to-fix list: the array bounds should be set correctly right after array creation. A "SetBound()" is missing in the generated code.

Cheers!

A1880

Manuel

Administrator

  • "Manuel" is male

Posts: 256

Date of registration: Jul 16th 2008

Location: Erlangen, Germany

Occupation: Software Developer

Hobbies: Jabaco, game theory, text-mining

  • Send private message

5

Monday, July 20th 2009, 8:44pm

Quoted

looking through the de-compiled code of an array-of-controls sample, I've found that LBound() is actually correct returning 0. The error is that the array is always created with LBound() 0
Thank you for debugging. I'll fix that.

Similar threads

Rate this thread
WoltLab Burning Board