Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Help converting VBA to VFP
Message
General information
Forum:
Visual FoxPro
Category:
Object Oriented Programming
Miscellaneous
Thread ID:
00293109
Message ID:
00294033
Views:
30
Roi;

Perhaps you could help me with one last thing. I was working on exactly the tack you recommend (what a pain figuring out EntityType=7!) but I got majorly hung up on attribs = Entity.GetAttributes, where VFP reports "Array dimensions are invalid".

Looking up the GetAttributes() shows that it returns a 'Variant', which should be an array. Do I need to do something special in VFP to accept this data? I'm pretty sure that if I can get this array into VFP, I'll be able to succeed, at least until I can figure out a way to filter the data.

TIA

>Hi Michael,
>
>I don't really have an answer for you. I know what is happening though. The selection is not honoring the filter (you are getting _everything_ in the drawing and not just inserts name 'DOOR'. I can't figure out how to pass the arrays to the ssnew.SELECT method properly.
>
>A really crappy (and I mean this sucks bigtime) work around is to change the for loop to:
>
>
** Spin through the selset
>FOR EACH Entity IN ssnew
>	IF Entity.EntityType = 7 && are you an insert?
>		attribs = Entity.GetAttributes
>		** spin through the attribute collection of the insert.
>		FOR I = 1 TO ALEN(attribs)
>			? attribs(I).TagString + "=" + attribs(I).TextString
>		NEXT
>	ENDIF
>NEXT
>The if just tests to make sure it's an insert. MUCHO PROBLEMO, on a large drawing you will be looping every entity in the .dwg not just the inserts you want.
>
>Check out Autodesks news groups. adesknews.autodesk.com is the server. Look for the autodesk.autocad.customization.vba group. Someone there may have an idea why the ssnew.SELECT is not filtering properly. I did learn that the aKey array has to be declared as an INTEGER but I still couldn't get it to work :(
>
>Sorry I couldn't be of much more help.
>
>>Thanks Roi (nice photo).
>
>Hehe, that's what working with architects does to you :-)
Kogo Michael Hogan

"Pinky, are you pondering what I'm pondering?"
I think so Brain, but "Snowball for Windows"?

Ideate Web Site
Previous
Reply
Map
View

Click here to load this message in the networking platform