---

Hi,

ich beschäftige mich nebenbei ein wenig mit iLogic und versuch mir dadurch mein Leben zu vereinfachen. Zur Zeit habe ich z.B. in Zeichnungen eine Regel, welche ich manuell ausführe und somit DWF, step und PDF von Zeichnungen durch einen Klick generiere. Nun wäre es ja noch geiler, wenn ich diese Regel in einer Baugruppe ausführen kann und er mir dann von der Zeichnung jedes platzierten Bauteils eine DWF, step und PDF erstellt. Dann wäre ich mit einem Klick fertig und würde nichts mehr vergessen.

Hat jemand eine Idee, ob und wie das geht?

Ein paar Dinge fallen mir dazu ein:
- Die Regel muss unterscheiden, ob es ein konstruiertes Bauteil ist oder ein Normteil bzw. Zukaufteil
- Die Regel muss wohl jede Zeichnung öffnen, die Dateien erstellen und wieder schließen, oder?

Hier auch mal der Code, wie ich das bisher in Zeichnungen handhabe:

Zitat:

---

'Dateiname des Douments (ohne Pfad) ermitteln:
Zeichnungsname = ThisDoc.FileName(False)

'Checken ob, die Datei schon gespeichert wurde:
If Zeichnungsname = "" Then
MessageBox.Show("Datei muss gespeichert werden, bevor sie publiziert werden kann.", "Datei noch nicht gespeichert", MessageBoxButtons.OK, MessageBoxIcon.Hand, MessageBoxDefaultButton.Button1)

Else
'Dieses Dokument speichern unter:
    ThisDoc.Document.SaveAs("I:\" & Zeichnungsname & ".dwf" , True)
End If

'speichert das dazugehörige Bauteil als step:
ThisDrawing.ModelDocument.SaveAs("I:\" & Zeichnungsname & ".stp" , True)

'Dieses Dokument als PDF speichern:
ThisDoc.Document.SaveAs("I:\" & Zeichnungsname & ".pdf" , True)

---

Ich danke schon Mal für die Hilfe

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo sconi, hab deine Beitrag eerst jetzt entdeckt. Hab mir so eine Ilogic auch erstellt, dazu noch die Abwicklung mit eingefügt und in einem Ordner mit dem Namen der Zeichnung abgespeichert. Mit einer Baugruppe geht das auch nur das es hier keine Abwicklung gibt! jetzt selbiges Problem wie bei dir, wie kann ich die Komponenten der Baugruppe so durchlaufen lassen. Ordername der BG -> Ordnernamen der Bauteile mit den entsprechenden Dateien (PDF DWG STP DXF).

Grüße
Gladi71

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

ich würde den ganzen Ablauf in der IAM starten:

Code:

---

Dim oDoc As AssemblyDocument 'aktuelle IAM
       
Dim oRefedDoc As Document  'siehe Hilfe: Document Object
Dim IDW_Name As String

For Each oRefedDoc In oDoc.AllReferencedDocuments
  If oRefedDoc.BOMStructure <> 51973 Then 'Teil ist nicht "gekauft"
  --->  IDW_Name = Left(oRefedDoc.FullFileName, Len(oRefedDoc.FullFileName) - 4) & ".idw"
  --->  IDW öffen und ausdrucken

' In der API:
' Siehe BOMStructure Property, ComponentOccurrence Object:
' BOMStructureEnum Enumerator

' z.B. Name: kPurchasedBOMStructure  -  Value: 51973 -  "gekauft"

---

Das ganze geht natürlich nur, wenn die IDW den gleichen Dateinamen hat, wie IPT oder IAM!
Woher soll die IPT oder IAM sonst wissen, wie ihre Zeichnungen heißen?

------------------
Gruß Roland

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP