Hallo Olli :-)
Wir haben einen Weg gefunden, der aber wieder über SendKeys geht, nur deutlich schneller und stabiler ist als bei den NOAs. Der Trick liegt darin, das man über die Schnelleingabeleiste in die "TPSCaptureConfiguration"-Workbench (die Workbench, die im Click-Interface automatisch aktiviert wird, wenn man im Context-Menü des Capture auf "Bearbeiten" geht) wechseln kann, so daß dann alle Änderungen an der Sichtbarkeit (show/noShow) einzelner Annotations direkt in die Capture-Definition übernommen werden. Eigentlich sollte das auch direkt über CATIA.StartCommand gehen, aber der Befehl ist zumindest in der deutschen Version buggy, so daß wir da auf sendkeys ausweichen mußten.
Die Zauberbefehle sind :
WshShell.SendKeys "b:FrmActivate~"
und
WshShell.SendKeys "b:Exit from capture~"
bzw.
CATIA.StartCommand "FrmActivate"
und
CATIA.StartCommand "Exit from capture"
wobei wie gesagt die StartCommand-Variante bei uns versagt hat...
Um das Verfahren mit den sendkeys zu realisieren, muß das Script allerdings außerhalb der CATIA gestartet werden und das CATIA-Objekt über
Set CATIA = GetObject("", "CATIA.Application")
angezogen werden - d.h. es funktioniert so erstmal nur unter Windows.
Der Ablauf sieht im groben also so aus:
* Capture erstellen
* Selection löschen
* Die neue Capture in die Selection packen
* FrmActivate aufrufen
* Selection löschen
* Die gewünschten Annotations in die Selection packen
* und in den Show stellen
* Alle Anderen Annotation in den NoShow packen
* Exit from capture aufrufen
* fertig
CU
Tapani
------------------
Don't take life so seriously....
it's not a permanent condition
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP