Hot News aus dem CAD.de-Newsletter:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  CATIA V5 Programmierung
  Probleme bei der Erstellung eines AllCATParts

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:   Probleme bei der Erstellung eines AllCATParts (387 mal gelesen)
mapast
Mitglied
Student


Sehen Sie sich das Profil von mapast an!   Senden Sie eine Private Message an mapast  Schreiben Sie einen Gästebucheintrag für mapast

Beiträge: 10
Registriert: 19.02.2018

CATIA V5 R26
Visual Studio 2013 Express, VB.Net

erstellt am: 09. Aug. 2018 10:59    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo,
ich habe ein Problem mit der automatischen Erstellung eines AllCATParts.

Bei der Suche im diesem Forum bin ich auf diesen Code gestoßen:

Code:

            Dim CATIA
            Dim Doc

            CATIA = GetObject(, "CATIA.application")
            Doc = CATIA.ActiveDocument

            Dim ActDoc As ProductDocument
            ActDoc = CATIA.ActiveDocument
            Dim MySel 'As Selection
            MySel = CATIA.ActiveDocument.Selection
            MySel.Add(ActDoc.Product)        '.Products.Item(1)

            CATIA.RefreshDisplay = True
            CATIA.StartCommand("Generate CATPart from Product...")
            MySel = CATIA.ActiveDocument.Selection
            MySel.Add(ActDoc.Product)

            CATIA.RefreshDisplay = True
            AppActivate("Generate CATPart from Product")
            'System.Windows.Forms.Application.DoEvents")
            SendKeys.Send("{Enter}")


Hier ist nochmal der Link zur Quelle:
http://ww3.cad.de/foren/ubb/Forum137/HTML/005735.shtml

Eigentlich soll das Programm problemfrei ausgeführt werden, allerdings hängt sich mein Programm immer auf, wenn es den "Enter"- Befehl senden möchte.

Weiß jemand vielleicht woran das liegen könnte ?

Gruß
Marcel

PS: Ich arbeite mit der R26 Version von CATIA

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

mapast
Mitglied
Student


Sehen Sie sich das Profil von mapast an!   Senden Sie eine Private Message an mapast  Schreiben Sie einen Gästebucheintrag für mapast

Beiträge: 10
Registriert: 19.02.2018

CATIA V5 R26
Visual Studio 2013 Express, VB.Net

erstellt am: 10. Aug. 2018 09:14    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Ich habe in den Tiefen des Internets doch einen Code gefunden, mit dem es funktioniert!
Das Problem lag darin, dass ein Timer festgelegt werden muss, um den SendKey -Auftrag zu senden.

http://nickpisca.com/BLAST/index.php/GenerateCATPartFromProduct

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

MarcL68
Mitglied
Group Leader Mechanical Design


Sehen Sie sich das Profil von MarcL68 an!   Senden Sie eine Private Message an MarcL68  Schreiben Sie einen Gästebucheintrag für MarcL68

Beiträge: 20
Registriert: 21.08.2013

Windows 7 Professionnel
Version 6.1.7601 SP1
HP 8760w i7-2630QM; 2.0GHz;(RAM)8,00 Go
NVIDIA Quadro 3000M
CATIA V5R2012 SP3

erstellt am: 20. Aug. 2018 09:16    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für mapast 10 Unities + Antwort hilfreich

Hallo,

Hier ein Code ohne "CATIA.StartCommand" und "Senkey" die oft problematisch sind.

https://ww3.cad.de/foren/ubb/Forum137/HTML/005584.shtml

------------------
Gruss
Marc

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

bgrittmann
Moderator
Konstrukteur


Sehen Sie sich das Profil von bgrittmann an!   Senden Sie eine Private Message an bgrittmann  Schreiben Sie einen Gästebucheintrag für bgrittmann

Beiträge: 10281
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 20. Aug. 2018 09:23    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für mapast 10 Unities + Antwort hilfreich

Servus Marc

Bei neueren Releases ist für dies Lösung aber die DF1-Lizenz notwendig (siehe zB hier)

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

mapast
Mitglied
Student


Sehen Sie sich das Profil von mapast an!   Senden Sie eine Private Message an mapast  Schreiben Sie einen Gästebucheintrag für mapast

Beiträge: 10
Registriert: 19.02.2018

CATIA V5 R26
Visual Studio 2013 Express, VB.Net

erstellt am: 20. Aug. 2018 09:39    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo Bernd,

ich kann zwar über den Makro-Editor von CATIA zwar "ENTER" über "SendKeys" verschicken, wenn ich allerdings den Code auf mein CATSkript übertrage, funktioniert dies nicht mehr.

Darüber hinaus habe ich in meinem CATSkript versucht SendKeys mit diesem Objekt anzusteuern:

Code:
Set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "{Enter}", True

Dies war aber auch ohne Erfolg.
Hast du da vielleicht noch eine Idee, wie es funktionieren könnte?

Gruß
Marcel

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2018 CAD.de | Impressum | Datenschutz