Getting a list of ALL symbols in the active document

[Matt Panzer]

Is there a way to get a list of all symbol definitions (including any nested in symbol folders) that are only in the current VW document?

[Hippocode]

criteria:='(INSYMBOL & INOBJECT & INVIEWPORT & (T=SYMBOL))';
ForEachObject(MakeTheList, criteria); 

This should loop trough all the symbols, within the function MakeTheList you can get the symbolfoldername with the info on this post:

http://www.vectorlab.info/index.php?title=Han-Get_Symbol_Folder

[Matt Panzer]

Thanks hippothamus,

Sam Jones and Raymond Mullin lent me a hand on the Vectorscript Mail List. I was using ForEachObjectInList but had it set not to look in groups. Apparently, Symbol Folders are considered groups in this case. All is well now.

[J. Miller]

Hey Matt,

I'm working on the same situation right now.

What did you come up with. I also need to add rather a certain record is also attached to that symbol definition

TIA

Jeff Miller

[Matt Panzer]

Hi Jeff,

I cannot remember exactly what I was doing when I asked this, but I think I wound up using a resource list. Something like this to get the list.

PROCEDURE MAIN

VAR

symDefList : LONGINT;

symDefNum : LONGINT;

BEGIN

symDefList := BuildResourceList( 16, 0, '', symDefNum );

END;

[klinzey]

ForEachObject() will only search objects placed in the document, it will not search the symbol list.

You can use ForEachObjectInList() and pass in fSymDef to get the the head of the symbol list. You do the record checking in the callback function. (FYI: Make sure to do type checking because you will encounter handles to symbol folders too.)

BuildResourceList() is great but you will need to traverse the list again to look for the attached record. There is a remove call to remove items from the list.

Which calls are better all depends on what else you have to do to the list of symbols.

[J. Miller]

I wound up using ForEachObjetcInList as Kevin mentioned. It seems to work fine... so far.

Thanks,

Jeff