Vítejte !   Přihlášení | Registrace
Hledat
Hlavní menu
CATIA fórum.cz
Novinky
Seriál CATIA
Obecně o CAD
Novinky ze světa DS
Makra pro CATIA V5
Diskuse
Vytvořit téma
Koncepty
Seznam oblíbených
Soukromé zprávy
Pravidla
Live CHAT
VIP žádost
Základy Catia
Ke stažení
Doporučujeme
Pracovní příležitosti
Reklama a kampaně
O fóru
Nápověda

Nastaveni intensity

UživatelPříspěvek
Pavel Krsek

Poslat zprávu | Profil
Datum: 14.10. 2010 | Zobrazeno: 10448x
Konfigurace CATIA:

Text dotazu:
Ahoj vsem, mel bych prosim dotazek, jakym parametrem se da priradit do makra nastaveni Low Intensity (viz. Properties objektu - zalozka Graphic - Prepinac Low Intensity).

tj. pro nastaveni barvy je to napr:

... SetRealColor 255,0,255,0

ale pro danou intensitu nemohu najit prikaz.

Pokud nekdo vi, tak dekuji za reakci.

Jan Svoboda

Poslat zprávu | Profil 		[#1195] | Publikováno: 14.10. 2010 - 09:09
Ahoj, našel jsem jenom tohle... 

CatViewBackgroundMode (Enumeration)

enum CatViewBackgroundMode {

  catStandard,

  catInvisible,

  catUnpickable,

  catLowIntensity,

  catUnpickableLowIntensity

}



The way the background of a view is displayed at creation.



Values: 

catInvisible 

Background not display 

catStandard 

Background pickable and not in low intensity 

catUnpickable 

Background unpickable and not in low intensity 

catLowIntensity 

Background pickable and in low intensity 

catUnpickableLowIntensity 

Background unpickable and in low intensity

Martin

Poslat zprávu | Profil 		[#2730] | Publikováno: 23.03. 2012 - 15:28
Já řešil průhlednost asi takto: 


Dim partDocument1 As PartDocument 

Set partDocument1 = CATIA.ActiveDocument 

Dim selection1 As Selection 

Set selection1 = partDocument1.Selection 

selection1.Search "Name=pridavek2,all" 

'==================================================================== 

'zjistí průhlednost objektu 

'==================================================================== 

Dim op 

op = CLng(0) 

Set visProperties1 = CATIA.ActiveDocument.Selection.VisProperties 

visProperties1.GetVisibleOpacity op 

MsgBox "opacity = " & op 

'==================================================================== 

'nastaví průhlednost objektu 

'==================================================================== 

Set visProperties1 = CATIA.ActiveDocument.Selection.VisProperties 

visProperties1.SetRealOpacity 0, 1 'Hodnota 255(neprůhledný) Hodnota 0(průhledný)


Martin.


Uživatel nepřihlášen

Pro zobrazení obsahu stránky / provedení akce (vytvoření nového téma, napsání odpovědi do diskuse apod.) musíte být přihlášeni.