|
CATIA V5 Allgemein : cgr, wrl, stl in CATPart konvertieren
kri am 22.01.2007 um 09:48 Uhr (0)
Hallo Lusilnie,das Script läuft klasse. Kann Dir leider keine U`s mehr geben. Geht wohl nur einmal pro Thread.Eine Frage hätte ich noch zur "Benutzerfreundlichkeit".Ist es möglich, das Script so abzuändern, das nach dem speichern als *CATPart, das Catpart auf den Schirm bleibt?Man war das ein schwerer Satz .Dann kann man das entstandene Part direkt in sein Arbeits-Product ziehen.------------------kriWarum wollen Leute, die nicht einmal einen PC sauber hoch und wieder runter fahren können, entscheiden welc ...
| | In das Form CATIA V5 Allgemein wechseln |
|
CATIA V5 Allgemein : cgr, wrl, stl in CATPart konvertieren
kri am 17.01.2007 um 13:42 Uhr (0)
Zitat:Original erstellt von Steffen Hohmann:Liebe CATIA-Gemeinde,...So hier nun die Scriptzeilen:Sub CATMain() sInputFile = CATIA.FileSelectionBox(".cgr-Datei auswählen", "*.cgr", CatFileSelectionModeOpen) Dim oDoc As Document Set oDoc = CATIA.Documents.Read(sInputFile) oDoc.ExportData sInputFile + ".model", "model" oDoc.CloseEnd Sub...Euer Steffenmal ne Frage an jemanden der so was kann.Kann man in das Script noch den DienstprogrammaufrufMigrateV4ToV5 einbauen? Dann wäre die Parterstellun ...
| | In das Form CATIA V5 Allgemein wechseln |
|
CATIA V5 Allgemein : cgr, wrl, stl in CATPart konvertieren
kri am 19.01.2007 um 13:18 Uhr (0)
@ Lusilnie,super funzt.Es gibt allerdings eine Einschränkung auf die ich hinweisen möchte (ist glaub ich eine V4 Limitierung).Das Input-*.cgr darf max. 80 Zeichen haben.Da das entstehende *.model (1. Step) auf 80 Zeichen limitiert ist und der Dateiname des entstehenden *.model gegebenenfalls auf 80 Zeichen gekürzt wird,läuft die Catpartkonvertierung (2. Step) aus dem Model nicht durch, da die Routine nicht den richtigen Model-Namen findet (wurde ja auf 80 Zeichen gekürzt).Also Notfalls *.cgr kopieren und i ...
| | In das Form CATIA V5 Allgemein wechseln |
|
CATIA V5 Allgemein : cgr, wrl, stl in CATPart konvertieren
kri am 23.01.2007 um 09:24 Uhr (0)
Hallo Lusilnie,die Sache mit dem Hochkomma/löschen funktioniert bei mir nicht richtig.Leider wird das CATPart geschlossen und das Model bleibt offen.- lösche ich die vorletzte "oDoc.Close" bleibt das Model offen- lösche ich die letzte "oDoc.Close" bleibt das Model offen- lösche ich die vorletzte und letzte "oDoc.Close" bleiben das Model & CATPart offenAlso hab ich beide gelöscht. Dann muß ich zwar das Model manuell schließen.Aber das Script läuft schneller durch als mit dem Öffnen.Befehl am Ende.---------- ...
| | In das Form CATIA V5 Allgemein wechseln |
|
CATIA V5 Allgemein : cgr, wrl, stl in CATPart konvertieren
kri am 22.01.2007 um 18:02 Uhr (0)
Hallo,hab da selbst was gebastelt. Nicht das ich wirklich verstehe was ich da gemacht habe.Der Code ist aber gut lesbar. Da hab ich halt mit Copy/Paste probiert und ne Bezeichnung ausgewechselt. Geht garantiert viel eleganter.Jetzt wird das erstellte CATPart nach der Erstellung geöffnet.Sub CATMain() Dim sInputFile As String sInputFile = CATIA.FileSelectionBox(".cgr-Datei auswaehlen", "*.cgr", CatFileSelectionModeOpen) Dim sInputFileName As String sInputFileName = Left(sInputFile, InStrRev(sInp ...
| | In das Form CATIA V5 Allgemein wechseln |
|
CATIA V5 Allgemein : cgr, wrl, stl in CATPart konvertieren
kri am 22.01.2007 um 09:48 Uhr (1)
Hallo Lusilnie,das Script läuft klasse. Kann Dir leider keine U`s mehr geben. Geht wohl nur einmal pro Thread.Eine Frage hätte ich noch zur "Benutzerfreundlichkeit".Ist es möglich, das Script so abzuändern, das nach dem speichern als *CATPart, das Catpart auf den Schirm bleibt?Man war das ein schwerer Satz .Dann kann man das entstandene Part direkt in sein Arbeits-Product ziehen.------------------kriWarum wollen Leute, die nicht einmal einen PC sauber hoch und wieder runter fahren können, entscheiden welc ...
| | In das Form CATIA V5 Allgemein wechseln |
|
CATIA V5 Allgemein : cgr, wrl, stl in CATPart konvertieren
kri am 17.01.2007 um 13:42 Uhr (1)
Zitat:Original erstellt von Steffen Hohmann:Liebe CATIA-Gemeinde,...So hier nun die Scriptzeilen:Sub CATMain() sInputFile = CATIA.FileSelectionBox(".cgr-Datei auswählen", "*.cgr", CatFileSelectionModeOpen) Dim oDoc As Document Set oDoc = CATIA.Documents.Read(sInputFile) oDoc.ExportData sInputFile + ".model", "model" oDoc.CloseEnd Sub...Euer Steffenmal ne Frage an jemanden der so was kann.Kann man in das Script noch den DienstprogrammaufrufMigrateV4ToV5 einbauen? Dann wäre die Parterstellun ...
| | In das Form CATIA V5 Allgemein wechseln |
|
CATIA V5 Allgemein : cgr, wrl, stl in CATPart konvertieren
kri am 19.01.2007 um 13:18 Uhr (1)
@ Lusilnie,super funzt.Es gibt allerdings eine Einschränkung auf die ich hinweisen möchte (ist glaub ich eine V4 Limitierung).Das Input-*.cgr darf max. 80 Zeichen haben.Da das entstehende *.model (1. Step) auf 80 Zeichen limitiert ist und der Dateiname des entstehenden *.model gegebenenfalls auf 80 Zeichen gekürzt wird,läuft die Catpartkonvertierung (2. Step) aus dem Model nicht durch, da die Routine nicht den richtigen Model-Namen findet (wurde ja auf 80 Zeichen gekürzt).Also Notfalls *.cgr kopieren und i ...
| | In das Form CATIA V5 Allgemein wechseln |
|
CATIA V5 Allgemein : cgr, wrl, stl in CATPart konvertieren
kri am 23.01.2007 um 09:24 Uhr (1)
Hallo Lusilnie,die Sache mit dem Hochkomma/löschen funktioniert bei mir nicht richtig.Leider wird das CATPart geschlossen und das Model bleibt offen.- lösche ich die vorletzte "oDoc.Close" bleibt das Model offen- lösche ich die letzte "oDoc.Close" bleibt das Model offen- lösche ich die vorletzte und letzte "oDoc.Close" bleiben das Model & CATPart offenAlso hab ich beide gelöscht. Dann muß ich zwar das Model manuell schließen.Aber das Script läuft schneller durch als mit dem Öffnen.Befehl am Ende.---------- ...
| | In das Form CATIA V5 Allgemein wechseln |
|
CATIA V5 Allgemein : cgr, wrl, stl in CATPart konvertieren
kri am 22.01.2007 um 18:02 Uhr (1)
Hallo,hab da selbst was gebastelt. Nicht das ich wirklich verstehe was ich da gemacht habe.Der Code ist aber gut lesbar. Da hab ich halt mit Copy/Paste probiert und ne Bezeichnung ausgewechselt. Geht garantiert viel eleganter.Jetzt wird das erstellte CATPart nach der Erstellung geöffnet.Sub CATMain() Dim sInputFile As String sInputFile = CATIA.FileSelectionBox(".cgr-Datei auswaehlen", "*.cgr", CatFileSelectionModeOpen) Dim sInputFileName As String sInputFileName = Left(sInputFile, InStrRev(sInp ...
| | In das Form CATIA V5 Allgemein wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
