Stückliste der verwendeten Bauteile

[info]

Hallo,
gibt es eine Möglichkeit sich alle Bauteile einer rhinodatei mit stückzahl und namen auflisten zu lassen und diese auszudrucken?
danke und grüße
marcel

[Michael Meyer]

Hallo Marcel,

für Blöcke funktioniert das z.B. mit folgendem Skript:

Sub CountAllInstancesOfAllBlocks
arrNames = Rhino.BlockNames(True)
If IsArray(arrNames) Then
  For Each strName In arrNames
    Rhino.Print strName & " = " &
CStr(Rhino.BlockInstanceCount(strName))
  Next
End If
End Sub


Hilft das?

Gruß,

Michael

[info]

Hallo Michael,
ich danke dir.
Bekomme aber beim Ausführen einen Syntaxfehler!?

Grüße
marcel

[info]

Hi Michael, es läuft-mein fehler.


Für angelegte Blöcke ist das script super.
jetzt benötige ich noch ein script welches mir alle benannten objekte ( z.b Kompressor03) auflistet und durchzählt.

grüße

marcel

[Michael Meyer]

Hallo Marcel,

OK. Sorry, da habe ich gerade nichts parat. Ich frag mal nach, ob es so ein Skript schon gibt.

Grüße,

Michael