Quote:
Originally Posted by Erel
Can you post the code that you are trying to run?
|
Thanks Erel.
Perhaps first you would download StellaFerox's
Planetarium and try running it under the IDE and then tell me why it fails on the call frmMain.Polygon().
Then insert
Code:
Dim Type(X,Y) ArrayXY(0)
in the Sub Globals and
Code:
Dim Type(X,Y) ArrayXY(Orbit + 1)
just before the line
Code:
For JJ = J To J+Orbit Step Size
Of course if you can explain to me why my code is faulty without running it, that would be good too!
I have actually got it to work by using a 2D array instead of an array of structures, which is less readable although very similar (identical?) in operation though not in syntax. The complete modification of course requires two extra lines to set up the array content and a change of format of the frmMain.Polygon().
Regards, Mike.