CAD Fórum : Obsahové centrum https://www.cadforum.cz/forum/ Sat, 18 Apr 2026 14:54:16 +0000 Thu, 09 Apr 2020 10:59:50 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 https://www.cadforum.cz/forum/RSS_post_feed.asp?TID=30337 <![CDATA[CAD Fórum]]> https://www.cadforum.cz/forum/forum_images/web_wiz_forums.png https://www.cadforum.cz/forum/ <![CDATA[Obsahové centrum : Nevadí, v naprosté většině případů...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=30337&PID=119935&title=obsahove-centrum#119935 Autor: Radek Pícha
Předmět: 30337
Zasláno: 09.dub.2020 v 10:59

Nevadí, v naprosté většině případů to funguje i tak. Pokud je někde problém, je třeba na to myslet a vyzkoušet čistou deklaraci proměnné.
Můj problém je vyřešen, děkuji. Navíc mám nový poznatek.
]]> Thu, 09 Apr 2020 10:59:50 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=30337&PID=119935&title=obsahove-centrum#119935 <![CDATA[Obsahové centrum : Aha, já jsem dočetl jen do popisu...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=30337&PID=119929&title=obsahove-centrum#119929 Autor: Vladimír Michl
Předmět: 30337
Zasláno: 09.dub.2020 v 10:29

Aha, já jsem dočetl jen do popisu syntaxe:

variablelist

Povinná hodnota. Seznam proměnných, které jsou deklarovány v tomto příkazu.

variable [ , variable ... ]

Každá variable má následující syntaxi a části:

variablename [ ( [ boundslist ] ) ] [ As [ New ] datatype [ With{[ .propertyname = propinitializer [ , ... ] ] } ] ] [ = initializer ]



Tak to jsem neodkázal na zrovna vhodný příklad, VBA to asi vyžaduje takto.
]]> Thu, 09 Apr 2020 10:29:16 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=30337&PID=119929&title=obsahove-centrum#119929 <![CDATA[Obsahové centrum : Takže to má být takto ? Dim a...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=30337&PID=119921&title=obsahove-centrum#119921 Autor: Radek Pícha
Předmět: 30337
Zasláno: 09.dub.2020 v 07:59

Takže to má být takto ?
Dim a As String, b As String, c As String
Ano, takto to opravdu funguje. Ale je to vopruz, to je snad první jazyk v kterém dělám a který to tak má Cry

Jenže právě podle toho článku to chápu opačně. Asi to platí pro VB, pro VBA to neplatí:

Pro každou proměnnou, kterou deklarujete, můžete určit různé typy dat pro různé proměnné pomocí samostatné klauzule As. Každá proměnná přebírá datový typ zadaný v první klauzuli As, který se objevil po jeho variablename část.

Dim a, b, c As Single, x, y As Double, i As Integer' a, b, and c are all Single; x and y are both Double
]]> Thu, 09 Apr 2020 07:59:18 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=30337&PID=119921&title=obsahove-centrum#119921 <![CDATA[Obsahové centrum : Syntaxe příkazu Dim není &#034;seznam...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=30337&PID=119917&title=obsahove-centrum#119917 Autor: Vladimír Michl
Předmět: 30337
Zasláno: 09.dub.2020 v 07:27

Syntaxe příkazu Dim není "seznam a pak typ As", ale "seznam s možným individuálním nastavením jednotlivých typů - As". Viz (toto je sice pro VB.NET ale syntaxe je stejná):
https://docs.microsoft.com/cs-cz/dotnet/visual-basic/language-reference/statements/dim-statement

]]> Thu, 09 Apr 2020 07:27:40 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=30337&PID=119917&title=obsahove-centrum#119917 <![CDATA[Obsahové centrum : Super, funguje, děkuji.Přitom...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=30337&PID=119915&title=obsahove-centrum#119915 Autor: Radek Pícha
Předmět: 30337
Zasláno: 09.dub.2020 v 06:33

Super, funguje, děkuji.
Přitom jsem ovšem zjistil poněkud zvláštní skutečnost. Zkoušel jsem to samé, neustále jsem dostával chybu "Type mismatch", teď už vím proč:

Dim x, y As String
Dim CC As ContentCenterOptions
Set CC = ThisApplication.ContentCenterOptions
'toto je chyba:
CC.GetAccessOption ContentCenterAccessOptionEnum.kInventorDesktopAccess, x
'toto je správně:
CC.GetAccessOption ContentCenterAccessOptionEnum.kInventorDesktopAccess, y

Protože Dim x,y,z AS string vytvoří všechny vyjmenované proměnné kromě poslední jako Variant/Empty, ta poslední je String. Je to vidět v okně Locals. A i když provedu x="", bude proměnná x typu Variant/String. A příkaz GetAccessOption bazíruje na tom, aby proměnná do které vloží tu cestu byla čistě String, jinak hlásí chybu.

Existuje pro toto chování nějaké vysvětlení ? Nebo mám někde něco špatně...
]]> Thu, 09 Apr 2020 06:33:19 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=30337&PID=119915&title=obsahove-centrum#119915 <![CDATA[Obsahové centrum : U mne funguje: Sub GetCCloc()Dim...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=30337&PID=119907&title=obsahove-centrum#119907 Autor: Vladimír Michl
Předmět: 30337
Zasláno: 08.dub.2020 v 14:46

U mne funguje:

Sub GetCCloc()
 Dim CCloc As String
 Dim CC As ContentCenterOptions
 Set CC = ThisApplication.ContentCenterOptions
 CC.GetAccessOption ContentCenterAccessOptionEnum.kInventorDesktopAccess, CCloc
 MsgBox CCloc
End Sub
]]> Wed, 08 Apr 2020 14:46:11 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=30337&PID=119907&title=obsahove-centrum#119907 <![CDATA[Obsahové centrum : Dobrý den.Jak zjistím ve VBA umístění...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=30337&PID=119904&title=obsahove-centrum#119904 Autor: Radek Pícha
Předmět: 30337
Zasláno: 08.dub.2020 v 13:25

Dobrý den.
Jak zjistím ve VBA umístění knihoven obsahového centra ? Jde mi o cestu:

Inventor -> Nástroje -> Možnosti aplikace -> karta Obsahové centrum -> Možnosti přístupu: Umístění knihoven

Zkoušel jsem GetAccessOption, ale bez úspěchu.
Děkuji

]]> Wed, 08 Apr 2020 13:25:06 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=30337&PID=119904&title=obsahove-centrum#119904