|
CATIA V5 Programmierung : PDF-Dokument aus CATIA heraus öffnen
tberger am 13.07.2011 um 15:57 Uhr (0)
Damit würde es zum Beispiel gehen:Sub CATMain()Dim Dokument As StringDokument = InputBox("Geben Sie das PDFDokument mit Pfad an ...", "PDF aus CATIA öffnen", "C:")Dim objIntExplorer As ObjectSet objIntExplorer = CreateObject("InternetExplorer.Application")objIntExplorer.Visible = TrueobjIntExplorer.Navigate DokumentEnd Sub------------------Grüße aus dem ThurgauThomas+++++++++++++++++++++++++++++++++CATIA - eine Laune der Natur ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro um Zahlen in Zeichnung zu setzen
tberger am 24.07.2011 um 13:59 Uhr (0)
Hallo Zeus34,Ich glaube, das könnte es sein:Sub CATMain()Dim StatusDim Position(1)Dim drawingDocument1 As DrawingDocumentSet drawingDocument1 = CATIA.ActiveDocumentCATIA.ActiveWindow.ActiveViewer.Reframe Fit in PageStatus = drawingDocument1.Indicate2D("Punkt wählen", Position)If (Status = "Cancel") ThenMsgBox "Textmarke wurde nicht eingefügt"Exit SubEnd IfDim parameters1 As ParametersSet parameters1 = drawingDocument1.ParametersDim intParam1 As IntParamDim ZAEHLER As SingleDim ZAEHLER_1 As LongDim ZAEHLER_ ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CAA Selektions Problem
tberger am 23.08.2011 um 19:54 Uhr (0)
Hallo Templer,ich habe zwar nicht dein Problem, welches du schilderst, aber mit deinem Code bekomme ich erst gar nichts zum Laufen (Kompilierungsfehler, "Description: Bezeichner erwartet; Statement: Dim select; Line: 5; Column: 12").Ändere ich hingegen das select auf selection ab, läuft es bei mir:Sub CATMain() Dim Doc As Document Set Doc = CATIA.ActiveDocument Dim selection As Selection Set selection = Doc.Selection MsgBox selection.Item2(1).Type End SubWenn ich etwas vorselektiere und ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Problem Farbe der Bohrung ändern
tberger am 25.08.2011 um 15:51 Uhr (0)
Du musst das Feature selbst in die Selektion bringen, dann die Visproperties der Selektion setzen, dann gehts.Aus deiner Suche, ggf. die dort selektierten Elemente in ein Feld bringen, aus dem Feld der Reihe nach prüfen falls nötig, dann die Elemente wieder in die Selektion bringen:Dim r, g, b As Longr = ... deine Werteg = ... deine Werteb = ... deine Werteselection1.Clearselection1.Add SelFeatureselection1.VisProperties.SetRealColor r, g, b, 1------------------Grüße aus dem ThurgauThomas+++++++++++++++ ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Offset fehler mit makro bestätigen
tberger am 26.08.2011 um 10:23 Uhr (0)
On error resume next einbauen nach Sub CATMain()davon abhängige Features werden aber auch nicht mehr ein Update liefern können.------------------Grüße aus dem ThurgauThomas+++++++++++++++++++++++++++++++++CATIA - eine Laune der Natur ...[Diese Nachricht wurde von tberger am 26. Aug. 2011 editiert.]
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Part in Baugruppe deckungsgleich auf anderem Part positionieren
tberger am 19.08.2011 um 14:44 Uhr (0)
Damit sollte es gehen:Sub CATMain()Dim OPENED_PRODUCT As DocumentSet OPENED_PRODUCT = CATIA.ActiveDocumentDim Selection As ObjectSet Selection = OPENED_PRODUCT.SelectionSelection.ClearDim status As StringDim InputObjectType(0)Dim selectedElement1 As ProductDim selectedElement2 As ProductInputObjectType(0) = "Product"status = Selection.SelectElement2(InputObjectType, "Bitte das erste Teil anklicken, das die Position vorgibt . . .", False)If (status "Normal") Then Exit SubElse Set selectedElement1 = ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Properties PLM Document Attributes abfragen
tberger am 13.09.2011 um 18:05 Uhr (0)
Ich nehme an das passiert mit Skripte, die beim erstmaligen Sichern von V5-Daten in eine Datenbank dann diese User Attributes erzeugen und befüllen (über eine "Integration", z.B. bei Teamcenter und Ford).Diese Daten können auch vorher angelegt worden sein (im CATIA, da dann auch durch Skripte) um sie dann in die Datenbank-Profilkarten zu "mappen".Und damit kommst du selbst ran:Sub CATMain()Dim partDocument1 As documentSet partDocument1 = CATIA.ActiveDocumentDim product1 As productSet product1 = partDocumen ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : PartNumber im Zwischenablage Kopieren
tberger am 16.09.2011 um 07:37 Uhr (1)
Zitat:Original erstellt von meisterlumpi:Die eigenschaft .partnumber gibt es nur bei unterprodukten einer baugruppe. die baugruppe selbst oder ein einzeln geöffnetes part haben nur die eigenschaft .name, .partnumber haben die keine.Das stimmt so nicht ganz. In einem Einzelteilfenster kann man überSub CATMain()Dim MyPart As PartDocumentSet MyPart = CATIA.ActiveDocumentDim MyPartProduct As ProductSet MyPartProduct = MyPart.ProductDim MyPartnumber As StringMyPartnumber = MyPartProduct.PartNumberMsgBox MyPart ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro langsamer...
tberger am 16.09.2011 um 12:45 Uhr (0)
Vielleicht könntest du einfach im Code ein deinproduct.updateeinbauen und danach eine BenachrichtigungMsgBox "Makro angehalten, zum weitermachen OK anklicken ..."einfügen.------------------Grüße aus dem ThurgauThomas+++++++++++++++++++++++++++++++++CATIA - eine Laune der Natur ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro langsamer...
tberger am 16.09.2011 um 13:27 Uhr (0)
Hallo sawah,was hast du eigentlich vorliegen?Wirklich ein Makro, das du startest und deine Baugruppe damit manipuliert?Oder hast due eine Simulation mit Verfahrwegen/Tracks etc. oder eine Kinematische Simulation?Dann müsstest du in den Definitionen der Tracks einfach gewisse Zeitdauern einbauen, um die nachfolgenden Schritte später laufen zu lassen oder den Faktor dwer Abspielung herabsetzen.------------------Grüße aus dem ThurgauThomas+++++++++++++++++++++++++++++++++CATIA - eine Laune der Natur ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Hinzugefügte Eigenschaften einen Wert zuweisen
tberger am 29.09.2011 um 12:01 Uhr (0)
So vielleicht:...Dim MyArray(4)MyArray(0) = "A2"MyArray(1) = "A4"MyArray(2) = "8.8"MyArray(3) = "10.9"MyArray(4) = "12.9"Dim strParam1 As Object StrParam ist restricted im CATVBASet strParam1 = parameters1.CreateString("Material", "")strParam1.SetEnumerateValues MyArray()...------------------Grüße aus dem ThurgauThomas+++++++++++++++++++++++++++++++++CATIA - eine Laune der Natur ...[Diese Nachricht wurde von tberger am 29. Sep. 2011 editiert.]
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : if then else mit abfrage
tberger am 15.11.2011 um 11:45 Uhr (0)
Hallo PaulPanza,ich glaube, dass das mit einer Rule nicht geht, da diese immer die Parameter sofort abgleichen will. Du bekommst einen Loop, die Rule wird nicht funktionieren.Versuche eine Reaction stattdessen. Die Reaction hat den Vorteil, dass sie nur den Zustand zum Zeitpunkt des Reaction-Starts abfragt und entsprechend reagiert.Loops wie bei Rules kommen so nicht zustande.------------------Grüße aus dem ThurgauThomas+++++++++++++++++++++++++++++++++CATIA - eine Laune der Natur ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Veröffentlichung von Sketch Ausgaben
tberger am 26.11.2013 um 08:33 Uhr (1)
Ich würde das selektierte Part über einen kleinen Umweg vorübergehend in ein eigenes Fenster vom Makro öffnen lassen, dann die Veröffentlichung durchführen und das Part-Fenster wieder schliessen lassen. Geht auch ganz schnell.------------------Grüße aus dem ThurgauThomas+++++++++++++++++++++++++++++++++CATIA - eine Laune der Natur ...
|
| In das Form CATIA V5 Programmierung wechseln |
