PureBasic Forums - English

Thank you very much. I will give this a shot.

Okay, I've hit a dilema.

I need to store a series of polyline shapes that are defined as a list of x/y coordinates. These represent the locations of coordinates for each point in an irregular 2d shape. In VB, I was drawing a series of shapes and filling them with a color. It's for a mapping display ...

I figured it out. I just need an array to store the object IDs.

Yes, I am using Mistrel's DarkGDK. It is super-cool for creating 3d games, and I'm creating one very complex game.

TOWER CAB (www.towercab.com)

For instance, the command dbCreateSprite(x,y,image) wil create a sprite using a loaded ...

Thanks, but I'm not using OGRE, I'm using the DarkGDK for PB.
In Visual Studio I simply had to define the object(s) type to expect in the list collection.
But, I'm not sure how to do that with a list in PB.
The list needs to understand that the item being added is of type "DarkGDK.Basic3D.Object3D"

I am loading 3d objects representing runway lights for an airport scene.
Those items are DirectX files.
So I need to store the collection of those objects.

Public OneBlueLight As DarkGDK.Basic3D.Object3D
Public BlueLights As New List(Of DarkGDK.Basic3D.Object3D)

TempLight = OneBlueLight.Clone
BlueLights.Add(TempLight)

Any ideas?

Thanks for your feedback guys. I fixed the problem.

I needed to Redim tflights by 1 each time I added a new structured record and not use "i", but a unique integer representing the # of items in the array.

Thanks...yes, I've been adding lots of breakpoints and examining variables, arrays, etc.

Thanks guys. I did narrow the problem down to the variable (i). So I'm looking back through the code to see what is happening with i.

Actually, I've been using the debugger and using Arraysize;
===========================================
Number = Random(32767)
RandomSeed(Number)
newtype = Random(ArraySize(tindex()),1)
typecnt = tindex(newtype)
tmp = actypes(typecnt)\actype

Debug actypes(typecnt)\actype
Debug ArraySize ...

Okay, I am rather new to this. I've been converting some VB code to PB and so far its been working fine. Until I introduced the use of structures.

This line of code is generating "[ERROR] Array index out of bounds."

tflights(i)\actype = actypes(typecnt)\actype ;this is the index to the actypes ...

If you don't use Global, do this;


Procedure open_window()
If OpenWindow(0, 218, 0, 1031, 405, "MOROSH SERIAL PORT MONITOR", #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar )
LoadImage (5, "pic1.jpg")
hBrush = CreatePatternBrush_(ImageID(5))
SetClassLongPtr_(WindowID(0 ...

Perhaps, move the OpenWindow() procedure past the 'End' statement, to the bottom of your code.

I am using the DBPro calls for the 3d window, and not using the PB Screen functions.
That means I am using the DB Sprite functions, not PBs.
So, I am trying to find the best combination to work for me.

I need to have the code respond to clicks on the strips, so I figured seperate Image Gadgets ...

:-)

Yes, right now they are merely backdrops for what is to come. The top row of the strip bay with the squares, will have to have code to respond to which square was clicked. In VB I would have created a control array of the squares, each one with its own unique index property which would be ...