|
CATIA V5 Programmierung : Hilft ein externer Editor weiter?
Bobby_Joe2001 am 26.04.2006 um 20:08 Uhr (0)
Probiers doch erst mal als VBScript, dass von Windows ausgeführt wird.Einfach eine leere Textdatei erstellen und sie z.B.test.vbsnennen.hier einfach das hier einfügen:On Error Resume Next Set CATIA = GetObject(, "CATIA.Application") If Err.Number 0 Then Set CATIA = CreateObject("CATIA.Application") CATIA.Visible = True End IfDann hast du zugriff auf die CATIA Objekte.Für VB.Net oder Excel VBA wärs genau der Selbe Code.------------------Du musst die Leute einmal richtig ärgern, dann wirst du end ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Kollisionsanalyse: Clash Against All
Bobby_Joe2001 am 27.04.2006 um 21:13 Uhr (0)
Das kann nicht funktionieren, weil du Konstanten verwendest, die von Catia zur Vereinfachung fest definiert wurden, z.b.:catClashComputationTypeAgainstAllcatClashInterferenceTypeClearanceaber woher soll das externe Script diese Konstanten kennen?lasst dir mal vom VB editor aus einfach die Zahlenwerte der Konstanten ausgeben, die sich dahinter verbergen z.b.:MsgBox catClashComputationTypeAgainstAllMsgBox catClashInterferenceTypeClearanceund trag in dein Script die Zahlenwerte ein.Ach übrigens heißt es:catCl ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Hybridbodies im SpecTree von unten nach oben durchlaufen
Bobby_Joe2001 am 28.04.2006 um 15:01 Uhr (0)
Hallo,hab jetzt nach knapp 3 Jahren das Problem auch Hat da mittlerweile einer eine Lösung?Ich habe eine Skizze (siehe Anhang) in geschachtelten Geometrischen Sets und will alle Instanzen mit der Parent Eigenschaft durchlaufen.Nur Catia überspringt immer ein Geometrisches Set.Sub CATMain()Set MyParent = CATIA.ActiveDocument.Selection.Item(1).ValueDo Set MyParent = MyParent.Parent Debug.Print MyParent.NameLoop Until MyParent.Name = "CNEXT"End SubIch bekommen folgende Liste:SketchesINSTANZ_10HybridBo ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Hybridbodies im SpecTree von unten nach oben durchlaufen
Bobby_Joe2001 am 29.04.2006 um 10:11 Uhr (0)
Zitat:Original erstellt von CAMiCADse:Erstmal Hallo an alle!Nachdem ich mich schon eine ganze Weile readonly durchs Forum bewege, nun endlich mein erster Beitrag...@Bobby_Joe2001Das Problem hat mich auch schon Nerven gekostet.Wenn Du den HybridBody auch als HybridBody deklarierst, dann funktionierts. In deinem Bsp. also folgende Zeile einfügen:Code:Dim MyParent As HybridBodyWarum das so ist habe ich bis jetzt auch noch nicht verstanden, aber zumindest läuft es so.GrußCAMiCADseWillkommen im Board!Das is sc ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Oberflächen unter UNIX
Bobby_Joe2001 am 06.05.2006 um 17:29 Uhr (0)
Hallo,Hat schonmal einer speziell mit TCL/TK grafische Oberflächen erstellt und für die CATIA Makros benutzt?Wie funktioniert sowas genau? So eine Oberfläche mit TCL/TK zu erstellen scheint nicht schwer zu sein. Die Befehle sind recht einfach, aber wie greif mit vbscript auf die Oberflächen zu?Wenn ichs als background Prozecess aufruf heißt des doch dann auch, dass ich TCL/TK als weitere Programmiersprache für die gesamte Automation benutze. Oder kann ich mit Vbcript die mit TCL/TK erstellten Oberflächen ä ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Einfügen in neues Part
Bobby_Joe2001 am 21.05.2006 um 12:55 Uhr (0)
Hallo,also Catia bennent das automatisch um, weil du ja mit dem jetztigen Code deinen Körper kopierst, aber in das selbe Part wieder einfügst (nicht in ein Neues wie du beschrieben hast!). Weil der Körper mit dem selben Namen schon existiert wird er umbenannt.Häng mal statt deinem letzten Absatz (Einfügen ...) folgenden Code an:Code:Neues Part erstellenSet MyNewPart = CATIA.Documents.Add("Part")Im neuen Part gleich das Part selbst selektierenMyNewPart.Selection.Add MyNewPart.PartKoerper einfügenMyNewPart.S ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Bewusste Wartezeit integrieren
Bobby_Joe2001 am 23.05.2006 um 19:25 Uhr (1)
Zitat:Original erstellt von Tapani.:Hallowir haben folgende Lösung am Start die mit einem nakten Windows XP auskommen sollte:das WScript-Objekt hält ein Sleep bereit. Ich habe bisher keinen Weg gefunden das WScript-Objekt aus einer catvbs-Datei heraus anzusprechen. Deshalb muß man einen Umweg über cscript.exe nehmen. Das hat zur Folge, daß man einen absoluten Pfad im Script hat. Aber wenn der für alle erreichbar gewählt wird, ist das ja nicht so dramatisch...:Das mit Vbs is schonmal gut.Und das mit dem a ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : GS umbenennen
Bobby_Joe2001 am 23.05.2006 um 20:00 Uhr (0)
GS = Geometrisches Set??Wenn ja dann so:Neues Set erstellen:Code:Sub CATMain() Set MyNewhybridbody = CATIA.ActiveDocument.Part.HybridBodies.Add MyNewhybridbody.Name = "klaus"End SubUnd so wird bestehender Name ganz einfach geändert:Code:Sub CATMain() Name vorher MsgBox CATIA.ActiveDocument.Part.HybridBodies.Item(1).Name Jetzt wird geändert CATIA.ActiveDocument.Part.HybridBodies.Item(1).Name = "da gugst du was" Name nacher MsgBox CATIA.ActiveDocument.Part.HybridBodies.Item(1).NameEnd SubGrußBo ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Einfügen in neues Part
Bobby_Joe2001 am 23.05.2006 um 20:20 Uhr (0)
Zitat:Original erstellt von Spritty:Hallo Lusilnie,das ist genau die Antwort, die ich eigentlich nicht hören möchte Aber jedes Programm führt so seine Macken mit sich herum, leider!Neustart bringt leider auch nichts und vor 2 Wochen ging ja mein Makro noch!!Und was habe ich jetzt für Möglichkeiten in meinem Makro?Kann ich den Körper und die Affinität umbenennen, damit ich denselben Namen habe wie zuvor?!Viele GrüßeSprittyJo, schneid halt einfach das "Kopie von " vom Namen ab.Code:Sub CATMain() Set My ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Verknüpfung einer Zeichnung ändern
Bobby_Joe2001 am 23.05.2006 um 20:31 Uhr (0)
Zitat:Original erstellt von mkna:Hallo Bobby_Joe2001Kannst Du mir den Befehl für den Schritt"Fügt das part als neuen link zur betreffenden Ansicht hinzu"nennen ?MartinBitteschön Code:Sub CATMain() Objectverweis für 3. View vom aktiven Blatt Set MyView = CATIA.ActiveDocument.Sheets.ActiveSheet.Views.Item(3) Objectverweis für 1. Dokument in der Dokumentliste, das ist z.B. ein Part Set MyDoc = CATIA.Documents.Item(1) Alle Links der Ansicht löschen MyView.GenerativeLinks.RemoveAllLinks Der Ansich ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Macro für ein Wort im Baum finden
Bobby_Joe2001 am 23.05.2006 um 20:56 Uhr (0)
Ich will ja nicht so sein.Also hier mal nen kleiner kompakter Beispielcode:Code:Sub CATMain() Set MySel = CATIA.ActiveDocument.Selection MySel.Search "Name=" & InputBox("Was suchst du", "Suche", "*") & ",all" If MySel.Count 0 Then For i = 1 To MySel.Count MsgBox MySel.Item(i).Value.Parent.Parent.Name Next End IfEnd SubGrußBobby------------------Du musst die Leute einmal richtig ärgern, dann wirst du endlich ernst genommen.Konrad Adenauer
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Part wird in Product eingefügt, aber nicht angezeigt
Bobby_Joe2001 am 23.05.2006 um 21:12 Uhr (0)
Zitat:Original erstellt von CEROG:Hallo zusammen,ich komme einfach nicht weiter. Abgesehen davon daß ich es nicht hinbekomme, daß die Geometrie angezeigt wird, tritt nach Umstellung auf VB ein weiteres Problem auf.Ich bekomme die Fehlermeldung:Function or interface marked as restricted, or the function uses an Automation type not supported in Visual Basic.Mein Problem: ich brauche alles in VB.Mein Code: Code:Private Sub Komponente_einfuegen()Dim ProduktDokument As ProductDocumentDim Producte As ProductsDi ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : GS umbenennen
Bobby_Joe2001 am 23.05.2006 um 21:24 Uhr (0)
Zitat:Original erstellt von Shaft:HmmmWenn ich das so mache:Code:Language="VBSCRIPT"Sub CATMain()Dim documents1 As DocumentsSet documents1 = CATIA.DocumentsDim partDocument1 As DocumentSet partDocument1 = documents1.Item("Part1.CATPart")Dim part1 As PartSet part1 = partDocument1.PartDim hybridBodies1 As HybridBodiesSet hybridBodies1 = part1.HybridBodiesDim hybridBody1 As HybridBodySet hybridBody1 = hybridBodies1.Add()hybridBody1.Name = "KLAUS"part1.Update End SubKommt ein GS mit Namen Klaus aber der Renam ...
|
| In das Form CATIA V5 Programmierung wechseln |
