Autor
|
Thema: Layer einer Fläche zuordnen (1023 mal gelesen)
|
Erich Mitglied Senior Consultant selbstständig
Beiträge: 198 Registriert: 03.10.2000 i7-9850H RAM 32,0 GB Nvidia Quadro T2000 Windows 7 Professional 64Bit
|
erstellt am: 03. Jan. 2005 19:44 <-- editieren / zitieren --> Unities abgeben:
|
u01dz Mitglied
Beiträge: 76 Registriert: 12.07.2003 V5R15GA
|
erstellt am: 04. Jan. 2005 15:29 <-- editieren / zitieren --> Unities abgeben: Nur für Erich
Hi, das ist möglich, wenn Du wie folgt vorgehst: 1. Die Fläche einer Selection zuordnen (vgl. Makrobuch Ziethen, S. 400, Befehl ADD) 2. Über die Eigenschaft VisProperties der Selection ein VisPropertySet erstellen (S. 402) und damit über die Methoden SetLayer und SetRealColor die Farben und den Layer zuordnen. ------------------ Tschüß, Dieter Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Erich Mitglied Senior Consultant selbstständig
Beiträge: 198 Registriert: 03.10.2000 i7-9850H RAM 32,0 GB Nvidia Quadro T2000 Windows 7 Professional 64Bit
|
erstellt am: 06. Jan. 2005 20:03 <-- editieren / zitieren --> Unities abgeben:
Hallo danke für den Tip mit SetRealColor, hat soweit funktioniert ein Auszug davon: Set Selection1 = partDocument1.Selection selection1.Search ("Name='Schnitt';in") Set VisPropSet1 = selection1.VisProperties VisPropSet1.SetRealColor oColor(J,0), oColor(J,1), oColor(J,2), 1 mit dem Layer komme ich nicht weiter, bitte ein Programm-Auszug. Vielen Dank
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| Anzeige.:
Anzeige: (Infos zum Werbeplatz >>)
|