| |
| KISTERS 3DViewStation: Mit 3D-Montageanleitungen werden Produkte bei der Fertigung lebendig, eine Pressemitteilung
|
Autor
|
Thema: Grundlagen VB Script (5210 mal gelesen)
|
plane Mitglied Techniker
Beiträge: 12 Registriert: 11.11.2008 Catia V5 R19 SP7
|
erstellt am: 13. Dez. 2011 17:43 <-- editieren / zitieren --> Unities abgeben:
Hallo, einleitend: bin als Konstrukteur absoluter Neuling in der Programierung. Ich habe mir ein wenig Basiswissen im VB Programieren angeeignet und möchte dies nun im Catia nutzen. Dazu habe ich ein Makro aufgezeichnet (Eine BGP mit einem Part anlegen) und versuche die Syntax zu verstehen. Das Makro beginnt folgendermaßen:
Language="VBSCRIPT" Sub CATMain() Dim productDocument1 As Document Set productDocument1 = CATIA.ActiveDocument Dim product1 As Product Set product1 = productDocument1.Product Dim products1 As Products Set products1 = product1.Products ... Nun meine Frage: Was beeinhaltet z.B die Class Document, Product, Products? Wo kann ich dazu Informationen finden?
Danke im vorraus, Gruss plane Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann Moderator Konstrukteur
Beiträge: 12005 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 13. Dez. 2011 18:11 <-- editieren / zitieren --> Unities abgeben: Nur für plane
Servus Zum einen gibt es die V5Automation.chm im Catia-Installationsverzeichnis, zum anderen einige Bücher (siehe catia.cad.de). Für Grundlagen zu VB/VBA sollten es genügend Fachbücher bzwr auch Tutorials im Inet finden. Gruß Bernd ------------------ Warum einfach, wenn es auch kompliziert geht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
plane Mitglied Techniker
Beiträge: 12 Registriert: 11.11.2008 Catia V5 R19 SP7
|
erstellt am: 14. Dez. 2011 17:12 <-- editieren / zitieren --> Unities abgeben:
Hallo Bernd, danke für den Tip. In der V5Automation.chm habe ich einiges an Informationen gefunden. Momentan aber nichts zum Verständnis über die Inhalte der "classes". Ich würde eine Class z.B so anlegen: type TProduct Name as string Anzahl as integer Gewicht as integer end type dim Product as TProduct set Product = New TProduct Ich weiss also was sich in meiner Class befindet.(Anzahl, Gewicht, Type) Im aufgezeichneten Makro steht z.B: dim Product1 as product set Product1 = ... Was verbirgt sich denn hinter der class "product"? Gruss plane
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
HoBLila Mitglied Dipl.-Ing. (BA) praktische Informatik - Senior Entwickler CAx
Beiträge: 1118 Registriert: 29.05.2008 DELL PRECISION T3500 Intel(R) Xeon(R) CPU W3540 @ 2.93GHz 12285 MB RAM NVIDIA Quadro FX 1800 Microsoft Windows 7 Enterprise Service Pack 1 CATIA V5 R19 SP09 HF69 VB6.5 CAA RADE CDC
|
erstellt am: 14. Dez. 2011 17:22 <-- editieren / zitieren --> Unities abgeben: Nur für plane
code\bin\V5Automation.chm::/generated/interfaces/ProductStructureInterfaces/interface_Product_11223.htm Edit: Oder: CAA V5 Visual Basic Reference / Objects and Collection / Product ------------------ Mit freundlichen Grüßen, Henry Schneider alias Lila Es gibt einen ewigen Wettkampf zwischen der Natur und den Ingenieuren: Die Ingenieure versuchen, immer idioten-sicherere Systeme zu bauen, die Natur versucht, immer bessere Idioten zu bauen Xing Stammtisch in Wolfsburg http://ww3.cad.de/foren/ubb/Forum491/HTML/000179.shtml [Diese Nachricht wurde von HoBLila am 14. Dez. 2011 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
plane Mitglied Techniker
Beiträge: 12 Registriert: 11.11.2008 Catia V5 R19 SP7
|
erstellt am: 14. Dez. 2011 17:43 <-- editieren / zitieren --> Unities abgeben:
|
Zed Mitglied Ingenieur
Beiträge: 17 Registriert: 14.06.2005 Creo, MathCad Prime
|
erstellt am: 13. Aug. 2021 13:58 <-- editieren / zitieren --> Unities abgeben: Nur für plane
Hallo! Ich kenne mich zwar nicht mit der Programmierung aus, habe aber ein Skript für Catia gefunden, daß die MAussteuerung erträglicher macht. Wie krieg ich das "installiert"? Kann mir das wer erklären? Grüße! ------------------ Hochachtungsvoll, Zed Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann Moderator Konstrukteur
Beiträge: 12005 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 13. Aug. 2021 14:09 <-- editieren / zitieren --> Unities abgeben: Nur für plane
|
Zed Mitglied Ingenieur
Beiträge: 17 Registriert: 14.06.2005 Creo, MathCad Prime
|
erstellt am: 13. Aug. 2021 14:33 <-- editieren / zitieren --> Unities abgeben: Nur für plane
Hallo! In Schriftlicher Form quasi... Darf ich den Link hier posten? #IfWinActive CATIA V5 MButton:: SendInput {Mbutton down}{RButton down} ; Hold down middle and right. Loop { Sleep, 10 GetKeyState, state, MButton, P if state = U ; The key has been released, so break out of the loop. break } SendInput {MButton up}{RButton up} ; Release the mouse buttons. return ;--------------- XButton1:: SendInput {Mbutton down} ; Hold down middle. Loop { Sleep, 10 GetKeyState, state, XButton1, P if state = U ; The key has been released, so break out of the loop. break } SendInput {MButton up} ; Release the mouse buttons. return ;---------------- zoom in
WheelUp:: SendInput {Ctrl down}{MButton down} MouseMove, 0, -50, 1, R ;move mouse upp, relative from position, zooming in. SendInput {Ctrl up}{MButton up} MouseMove, 0, 50, 1, R ;move back the mouse pointer to where it began. return ;---------------- zoom out WheelDown:: SendInput {Ctrl down}{MButton down} MouseMove, 0, 50, 1, R SendInput {Ctrl up}{MButton up} MouseMove, 0, -50, 1, R return ------------------ Hochachtungsvoll, Zed Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann Moderator Konstrukteur
Beiträge: 12005 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 13. Aug. 2021 14:41 <-- editieren / zitieren --> Unities abgeben: Nur für plane
Servus Ja, poste mal den Link. Vermutlich muss der Code erst kompiliert werden (das eine .exe raus kommt), und dann das Programm im Hintergrund laufen. Warum willst du an der Maussteuerung was ändern? Warum nicht einfach daran gewöhnen (oder eine 3D-Maus nutzen)? Gruß Bernd PS: Ist auf der Seite des Codes nicht auch eine exe verlinkt? ------------------ Warum einfach, wenn es auch kompliziert geht. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Zed Mitglied Ingenieur
Beiträge: 17 Registriert: 14.06.2005 Creo, MathCad Prime
|
erstellt am: 13. Aug. 2021 14:48 <-- editieren / zitieren --> Unities abgeben: Nur für plane
|
bgrittmann Moderator Konstrukteur
Beiträge: 12005 Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 13. Aug. 2021 14:51 <-- editieren / zitieren --> Unities abgeben: Nur für plane
|
Zed Mitglied Ingenieur
Beiträge: 17 Registriert: 14.06.2005 Creo, MathCad Prime
|
erstellt am: 13. Aug. 2021 15:31 <-- editieren / zitieren --> Unities abgeben: Nur für plane
|