|
CATIA V5 Programmierung : Verzweifelte INPUTBOX
serrano am 14.09.2006 um 15:07 Uhr (0)
Hallo,Villeicht kann ich dir helfen. Ich habe CATIA nicht da und kann es leider nicht ausprobieren.Nach der Inputbox:If oString = "" ThenGoTo oEndeEnd If...CODE...oEnde:End Submit GoTo oEnde springst du wo du willst wenn der String Leer ist.Hoffentlich könnte ich dir helfen. Wenn nicht, dann habe ich es mindestens versucht. ------------------mfg,serrano
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Löschen von Relations und Parameters
denyo_1 am 23.10.2008 um 16:59 Uhr (0)
Hallo,Code:...Liste1.ClearListe1.Search "CATKnowledgeSearch.AdvisorRelationSet.NameInGraph=Relations;all"Set of Relations definieren und leeren--------------------------------------------------------------Dim USel1 As SelectionSet USel1= CATIA.ActiveDocument.SelectionGefundene Set of Relations selektieren und entfernen------------------------------------------USel1.Cut...USel1.Cut kann nicht funktionieren da in der Selektion nicht drinnen ist! Mit Liste1.Cut bzw. Liste1.Delete sollte es gehen, da in dieser ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameterwerte in VB einlesen
k71 am 16.10.2006 um 13:27 Uhr (0)
Hallo Jan,wie gesagt mit UserForms hab ich bis dato nicht gearbeitet.Ich hab einfach mal eine Userform kreirt mit einem Eingabefeld und einer Schaltfläche:Private Sub CommandButton1_Click()Set part1 = CATIA.ActiveDocument.PartSet Param = part1.Parameters.RootParameterSet.DirectParametersEingabe1 = TextBox1Param.Item("Breite").Value = Eingabe1part1.UpdateEnd SubDas Problem ist, daß die Änderung am Parameter "Breite" erst nach Beendigung der Userform übernommen werden.Aber vielleicht hat hierzu ja jemand noc ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Step-Makro: Beliebigen Text am Ende das step-Dateinamens hinzufügen
Lionel Hutz am 03.09.2020 um 10:00 Uhr (1)
Code:Sub CATMain()Dim partDocument1 As DocumentSet partDocument1 = CATIA.ActiveDocument DocName =partDocument1.Name DocPath = partDocument1.Path StpPath = DocPath & "" & Left(DocName, Len(DocName) - 8) & "_Rohteil" & ".stp"partDocument1.ExportData StpPath, "stp"partDocument1.ExportData StpPath, "3dxml"End SubWenn du bei sPath die Dateiendung nicht vorgibst, kannst du ein einem Abwasch weitere Dateiformate exportieren. Die zugehörige Endung wird jeweils angehängt.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Auswahl von Elementen
BigCheese am 30.11.2007 um 17:38 Uhr (0)
Hi nochmals,ich denke Du suchst "HybridShapeBoundary" und "HybridShapeSpline".Falls nicht, kannst Du Dir ja den Typ mal ausgeben lassen mit folgenden Code:Code:Sub CATMain()Dim myPartDocumentSet myPartDocument = CATIA.ActiveDocumentSet mypart = myPartDocument.PartDim ElementToSelect(0)ElementToSelect(0) = "AnyObject"Set mySelection = myPartdocument.SelectionSelectedElement = mySelection.SelectElement2(ElementToSelect, "Auswahl", True)Set myItem = mySelection.Item(1).ValueMsgBox "Typ des selektierten Elemen ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Automatisieren Zeichnungen aktualisieren
Wahl am 09.03.2005 um 11:07 Uhr (0)
Hallo, ich bin Anfänger was Catia-Programmierung angbelangt kenne mich aber mit Access-VBA einigermassen aus. Habe ich eine Chance folgendes zu programmieren: -Öffnen einer IGES-Datei -Selektieren aller Texte -Anpassen von Farbe und Schriftart der Texte -Selektieren aller Geometrieelemente -Umwandeln der Farben und Strickstärken -Selektieren aller Bemassungen -Umwandeln der Farbe der Bemassungen -Selektieren aller Schraffueren -Umwandeln der Farben der Schraffuren Wo finde ich eigentlich die M ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Product mit allen Unterprodukten / Unterparts speichern
Proofin am 12.10.2006 um 13:40 Uhr (0)
Hi Conrad,versuch es mal mit:Set myDoc =CATIA.ActiveDocumentSet subProducts=myDoc.Product.ProductsFor i=1 To subProducts.Count Set subProduct=subProducts.Item(i) set subProductDoc = subProduct.ReferenzProduct.Parent call subProductDoc.SaveAs("SpeicherPfad" & subproductDoc.Name)Next iMfgProofin[Diese Nachricht wurde von Proofin am 12. Okt. 2006 editiert.][Diese Nachricht wurde von Proofin am 12. Okt. 2006 editiert.]
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter im Product aus Drawing bearbeiten
Jens Hansen am 23.09.2007 um 23:04 Uhr (0)
Hallo,Parameter können nur im unmittelbaren Zugriff geändert werden. Also MUSS das Produkt geöffnet sein, um die Paramter überhaupt anzusprechen. Allerdings bedeutet hierbei "geöffnet", dass das Produkt oder das Part geladen werden muss; es muss nicht sichtbar aufgerufen werden (kein OPEN).Wird ein Drawing geöffnet, wird das zugehörige Referenzmodell immer geladen und ist über CATIA.Documents.Item("Name_der_Referenz") ansprechbar.SGJens Hansen
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Part im Product neu positionieren
bgrittmann am 27.06.2012 um 12:37 Uhr (0)
ServusIch würde das Problem so angehen:Code:Sub CATMain()Dim productDocument As productDocumentDim childProduct As ProductDim RootProduct As ProductDim arrayPosition(11)Set productDocument = CATIA.ActiveDocumentSet RootProduct = productDocument.ProductFor Each childProduct In RootProduct.Products Position auslesen childProduct.Position.GetComponents arrayPosition Position korrigieren arrayPosition(9) = arrayPosition(9) * 0.001 arrayPosition(10) = arrayPosition(10) * 0.001 arrayPosition(11) = arrayP ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Geometrie aus dem Blatthintergrund
Lusilnie am 22.01.2008 um 00:05 Uhr (0)
Hallo cevk,sollte es nicht so gehen:Code:Sub copieren() Set drwdocument = CATIA.ActiveDocument Set DrwSheets = drwdocument.Sheets Set DrwSheet = DrwSheets.ActiveSheet Dim selection3 As Selection Set selection3 = drwdocument.Selection selection3.Clear selection3.Add DrwSheet.Views.Item(2) selection3.Search ("Name=*Testlinie*,all") selection3.Copy selection3.Clear selection3.Add DrwSheet.Views.Item(2) selection3.PasteEnd SubDamit sollte die Auswahl aus dem Background des aktuellen Sheets kopiert ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Edit Back ground
Lusilnie am 20.10.2006 um 10:09 Uhr (0)
Hallo leipziger,hilft Dir dies:Code:Option ExplicitLanguage = "VBSCRIPT"Sub CATMain() Dim drawingDocument1 As drawingDocument Set drawingDocument1 = CATIA.ActiveDocument Dim drawingSheets1 As drawingSheets Set drawingSheets1 = drawingDocument1.Sheets Dim drawingSheet1 As drawingSheet Set drawingSheet1 = drawingSheets1.ActiveSheet If drawingSheet1.Views.ActiveView.name = drawingSheet1.Views.Item(2).name Then drawingSheet1.Views.Item(1).Activate Else drawingSheet1.Views.Item(2).Activate End If ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia CAA Lizenz
RSchulz am 15.01.2019 um 11:04 Uhr (1)
Hallo,Makroleisten kann man im Adminmodus in den "globalen" Settings, die dann verteilt werden müssen, einstellen. Wichtig ist hierbei, dass man bei geöffneten Workbenches die Makroleisten für die Workbench einstellt. Demnach müssen übergreifende Makros ohne geöffnetes Dokument/Workbench hinzugefügt werden. Unter Tools Customize Commands lassen sich dann auch noch Hotkeys zuordnen.Die Programmierung im .Net ist eigentlich total simple. Die installierten COM Module auswählen und integrieren. Doku und Beis ...
|
| In das Form CATIA V5 Programmierung wechseln |
 |
CATIA V5 Programmierung : Constrains updaten
RSchulz am 25.09.2013 um 11:48 Uhr (15)
Das ist klar, wenn du dem Kind einen eigenen Identifier gibst, dann kannst du ihn auch ansprechen. Das Problem ist nur, dass die CATNLS somit vom Standard abweicht. Das heist, dass das Programm dann nur auf deinem Rechner läuft oder du überall diese austauschen musst. Das ist sehr fehlerträchtig!Den Key "CATAssembly.AsmCstSolve" kannst du AFAIK nicht direkt ansprechen. Der Dient lediglich der Identifikation von CATIA, zum auslesen der sprachabhängigen Texte. Die CATNLS würde ich nicht verändern. Ich gebe z ...
|
| In das Form CATIA V5 Programmierung wechseln |
