|
CATIA V5 Programmierung : Macros extern über VB
BADU am 21.10.2004 um 12:13 Uhr (0)
Halloich habe das Bild mal vergrössert. Wenn du ca. 3 Sekunden mit Mauszeiger im Bild bleibst, erscheint eine Schaltfäche und wenn du draufklicks wird das Bild in der tatsächliche Grösse angezeigt.Skript (besteht nur aus eine Zeile (ist nur ein Test)):_____________________________________________________________Sub CATMain()Dim params()CATIA.SystemService.ExecuteScript "S:catia_v5Testumgebung 9_Administration 6_MAKROS est.catvba", catScriptLibraryTypeVBAProject, "test.vba", "CATMain", paramsEnd Sub________ ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Wichtig!!! MsgBox - Tool !!!
BADU am 06.07.2004 um 13:25 Uhr (0)
Hallo Catia User Ich habe ein Tool gefunden womit die MsgBox Skript Definition vereinfacht wird. Einfach runterladen! http://www.oggisoft.de/msgbox_.htm Viel Spass damit ------------------ Gruss BADU
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Product to CatPart starten mit Makro
BADU am 01.07.2004 um 16:12 Uhr (0)
Hallo Catia User wie kann ich die Funktion Product to CatPart mit Makro starten? Kleine Syntax wäre hilfreich.Danke für eure Hilfe Gruss Badu ------------------ Gruss BADU
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Script und Makro Beispiele
BADU am 22.07.2004 um 08:58 Uhr (0)
hier kannst du die Beispiele zum Buch CATIA V5 - Effiziente Konstruktion mit Makros herunterladen. http://www.hanser.de/extras/ziethen/ ------------------ Gruss BADU
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro gleich am Anfang starten?
BADU am 11.08.2004 um 08:41 Uhr (0)
Hallo ich habe mein Catia Verknüpfung so wie cwillmann erweitert allerding startet mein Makro nicht. Pfad im Verknüpfung: C:ProgrammeDassault SystemesB12intel_acodeinCATSTART.exe -run CNEXT.exe -env CATIA_P3.V5R12.B12 -direnv C:DOKUME~1ALLUSE~1AnwendungsdatenDassaultSystemesCATEnv -macro C:ProgrammeDassault SystemesStartprogBatch_DateienSE.CATScript Woran kann das liegen? Ist mein Pfad viel zu lang? ------------------ Gruss BADU
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Erzeugen von OpenBodies in OpenBody
BADU am 26.08.2004 um 15:26 Uhr (0)
Hi Zizorro vielleicht hilft das hier: Language= VBSCRIPT Sub CATMain() Dim HB1 As HybridBody Set HB1 = CATIA.ActiveDocument.Part.Hybridbodies.Item ( Open_body.1 ) Dim HKoerper As HybridBodies Set HKoerper = HB1.Hybridbodies Dim HB2 As HybridBody Set HB2 = HKoerper.Add End Sub ------------------ Gruss BADU [Diese Nachricht wurde von BADU am 26. Aug. 2004 editiert.]
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Umbenennen Parameterset
BADU am 26.08.2004 um 17:09 Uhr (0)
HiStimt nicht so ganz.Es gibt die Möglichkeit den Namen mit der Suchfunktion zu ändern.Beispiel:Dim selection1 As SelectionSet selection1 = partDocument1.Selectionselection1.Search "CATKnowledgeSearch.AdvisorParameterSet.Name=Parameter_Name,all"For iI = 1 To CATIA.ActiveDocument.selection.CountCATIA.ActiveDocument.selection.Item(iI).Value.Name = "Neue_Name"Next------------------Gruss BADU [Diese Nachricht wurde von BADU am 26. Aug. 2004 editiert.]
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Erzeugen von OpenBodies in OpenBody
BADU am 06.09.2004 um 14:22 Uhr (0)
Hi Na klar: Sub CATMain() Dim HB1 As HybridBodies Set HB1 = CATIA.ActiveDocument.Part.HybridBodies Geöffnete Körper (Körper_1) erzeugen -------------------------------------- Dim Hilfsgeometrie As HybridBody Set Hilfsgeometrie = HB1.Add Hilfsgeometrie.Name = Körper_1 Geöffnete Körper (Körper_2) erzeugen -------------------------------------- Dim HB2 As HybridBody Set HB2 = CATIA.ActiveDocument.Part.Hybridbodies.Item ( Körper_1 ) Dim HKoerper As HybridBodies Set HKoerper = HB2.Hybridbodies Dim HB3 As ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Part einfügen --> vorher Ziel auswählen
BADU am 10.09.2004 um 19:16 Uhr (0)
Hallo Zusammen, ich bin mittlerweile ein bischen weitergekommen. Ich habe die Selektion definiert und klappt es aber nur für dei 1. Ebene (siehe Anhang). wie muss ich die Selektion (oder die Einfügeoperation) definieren dass für alle Ebenen wirksam ist? Skript: ---------------------------------------------------------------------- Sub CATMain() Dim Was(0) Was(0) = Product Set UserSel = catia.ActiveDocument.Selection UserSel.Clear E = UserSel.SelectElement2(Was, Produkt wählen , True) If E = Norma ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameterset erzeugen
BADU am 27.09.2004 um 11:27 Uhr (0)
Hallo Zusammen, ich habe es geschafft ein Parameterset zu erzeugen, allerdings schaffe ich es nur, es in den Hauptkörper einzufügen. Beispiel: -------------------------------------------------------------------- Dim ABody As Body Set ABody = CATIA.ActiveDocument.Part.MainBody Dim AParams As Parameters Set AParams = CATIA.ActiveDocument.Part.Parameters AParams.CreateSetOfParameters ABody ---------------------------------------------------------------------- Habt ihr eine Idee wie ich das erzeugte Parameters ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : VBA Projekte miteinander verknüpfen??
BADU am 15.10.2004 um 08:50 Uhr (0)
Hallo Ronny, ich werde es gleich mal ausprobieren. Heisst bei dir Subaufruf Makros das eigentliche Skript des Makros? Hintergrund warum ich zwei Projekte brauche: bei der definition der Symbole für die einzelne Makros gehen nach Neustert von Catia verloren und somit brauche ich dafür einen starttool ------------------ Gruss BADU
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : New Part script
BADU am 15.12.2004 um 07:33 Uhr (0)
Hi sebuse, vielleicht hilft das hier: _____________________________________________________________ _____________________________________________________________ Sub CATMain() Dim documents1 As Documents Set documents1 = CATIA.Documents Dim partDocument1 As PartDocument Set partDocument1 = documents1.Add( Part ) Dim product1 As Product Set product1 = partDocument1.GetItem( PART1 ) Dim Nummer As String Nummer = InputBox( Eingabe , Nummer , Nummer) product1.PartNumber = Nummer End Sub __________________ ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Part-Objekte mit Schleife erzeugen
BADU am 19.04.2005 um 11:53 Uhr (0)
Hi TomK79 versuchs mal so: Sub CATMain() Dim productDocument1 As ProductDocument Set productDocument1 = CATIA.ActiveDocument Dim product1 As Product Set product1 = productDocument1.Product Dim products1 As Products Set products1 = product1.Products Dim Name As String Dim I For I = 1 To 5 Name = Balken & I Dim product2 As Product Set product2 = products1.AddNewComponent( Part , Name) Next End Sub ------------------ Gruss BADU
|
In das Form CATIA V5 Programmierung wechseln |