CAD Fórum : Přesnost kót https://www.cadforum.cz/forum/ Mon, 20 Apr 2026 12:09:11 +0000 Wed, 19 Nov 2008 14:36:56 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 https://www.cadforum.cz/forum/RSS_post_feed.asp?TID=7560 <![CDATA[CAD Fórum]]> https://www.cadforum.cz/forum/forum_images/web_wiz_forums.png https://www.cadforum.cz/forum/ <![CDATA[Přesnost kót : :) ... já jsem si spíš doplnil...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=7560&PID=37923&title=presnost-kot#37923 Autor: johny
Předmět: 7560
Zasláno: 19.lis.2008 v 14:36

:) ... já jsem si spíš doplnil aby to fungovalo i na úhlové kóty...

(defun C:NK (/ ss presnost)
 (setq ss (ssget))
 (setq presnost (getint "\nPocet desetinnych mist: "))
 (command "_dimoverride" "dimdec" (itoa presnost) "" ss "")
 (command "_dimoverride" "dimadec" (itoa presnost) "" ss "")
 (princ)
)
]]> Wed, 19 Nov 2008 14:36:56 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=7560&PID=37923&title=presnost-kot#37923 <![CDATA[Přesnost kót : Paráda. Dal bych tam ještě podmínku,...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=7560&PID=37918&title=presnost-kot#37918 Autor: Ferdinand
Předmět: 7560
Zasláno: 19.lis.2008 v 14:23

Paráda. Dal bych tam ještě podmínku, jestli je to entita kóty - takhle to bere cokoli. Bez podmínky na entitu by to šlo i takhle:
(defun C:EK (/ pres1 pres2)
(setq pres1 (getvar "dimdec"))
(setq pres2 (getint (strcat "\nPocet desetinnych mist: " "<" (itoa pres1) ">")))
(if (= pres2 nil)
(progn
(setq pres2 pres1)
(command "_dimoverride" "dimdec" pres2 "" pause)
)
(command "_dimoverride" "dimdec" pres2 "" pause)
)
)
]]> Wed, 19 Nov 2008 14:23:00 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=7560&PID=37918&title=presnost-kot#37918 <![CDATA[Přesnost kót : Díky, nádhera :) Jeden by si myslel,...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=7560&PID=37758&title=presnost-kot#37758 Autor: johny
Předmět: 7560
Zasláno: 15.lis.2008 v 18:11

Díky, nádhera :) Jeden by si myslel, že už ho ten program nemá čím překvapit a ehle. O této funkci jsem neměl ani tucha.

]]> Sat, 15 Nov 2008 18:11:10 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=7560&PID=37758&title=presnost-kot#37758 <![CDATA[Přesnost kót : A co třeba toto ? (defun C:EK...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=7560&PID=37741&title=presnost-kot#37741 Autor: pavelstyl
Předmět: 7560
Zasláno: 14.lis.2008 v 15:51

A co třeba toto ?
(defun C:EK (/ ss presnost)
 (setq presnost (getint "\nPocet desetinnych mist: "))
 (setq ss (ssget))
 (command "_dimoverride" "dimdec" (itoa presnost) "" ss "")
 (princ)
)
 
Pavel Štyl
]]> Fri, 14 Nov 2008 15:51:30 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=7560&PID=37741&title=presnost-kot#37741 <![CDATA[Přesnost kót : Zdravim, často řeším, že potřebuju...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=7560&PID=37740&title=presnost-kot#37740 Autor: johny
Předmět: 7560
Zasláno: 14.lis.2008 v 15:40

Zdravim, často řeším, že potřebuju rychle snížit, nebo zvýšit přesnost kóty. Jaksi znám jen dvě cesty jak to udělat na už vytvořenou kótu. První je nepoužitelná (pravé tlacitko mám předefinované na Enter - ale je to rychlé, škoda že ta nabídka nejde vyvolat jinou kombinací kláves, nebo jde?) no a druhá možnost je ve vlasntostech (jenže je to dost nešikovné, páč se to nachází až skoro dole...).
Kolikrát jsem hledal v seznamu standardních příkazů něco jako DimEdit, ale žádnou kompexní editační funkci na kóty jsem nenašel :(
Jsem si ochotný na to udelat lispový prográmek, ale bohužel přesnost kóty jsem nenašel v základní listové definici entity Dimension (ani následných entit-jak je to třeba u bloků) - je to docela komplikovaná definice a bohužel do toho tak nevidím... (jakkoli běžnou entitu, nebo i blok bych si upravit uměl)
Prostě idea je taková, že zadám nějaký zkratkový příkaz např. EK a pak zadám číslo, což bude počet cifer za desetinnou čárkou.  (podobně to mám na tloušku křivky - je to super, tam jsem si bvystačil ale s keditem :)
Předpokládám, že je to mnohem hednodušší ve VBA, ten vša neumím :( Tak nevíte někdo jak lispovsky (nebo nejak) dostat tu aktuální hodnotu z definice a pak to aktualizovat? :) díky.
]]> Fri, 14 Nov 2008 15:40:05 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=7560&PID=37740&title=presnost-kot#37740