CAD Fórum : Zarovnávání odstavcového textu - klávesové zkratky https://www.cadforum.cz/forum/ Mon, 27 Apr 2026 20:55:04 +0000 Fri, 17 Sep 2010 08:47:34 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 https://www.cadforum.cz/forum/RSS_post_feed.asp?TID=11510 <![CDATA[CAD Fórum]]> https://www.cadforum.cz/forum/forum_images/web_wiz_forums.png https://www.cadforum.cz/forum/ <![CDATA[Zarovnávání odstavcového textu - klávesové zkratky : Z LISPu spuštěné příkazy komunikují...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=11510&PID=55855&title=zarovnavani-odstavcoveho-textu-klavesove-zkratky#55855 Autor: Vladimír Michl
Předmět: 11510
Zasláno: 17.zář.2010 v 08:47

Z LISPu spuštěné příkazy komunikují implicitně přes příkazový řádek. Ale dají se přesvědčit:
 
(defun C:TDL( / bod1)
  (setq bod1 (getpoint "\nLevý dolní bod: "))
  (initdia 1)
  (command "_mtext" bod1 "_ju" "_bl" bod1)
  (princ)
)
]]> Fri, 17 Sep 2010 08:47:34 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=11510&PID=55855&title=zarovnavani-odstavcoveho-textu-klavesove-zkratky#55855 <![CDATA[Zarovnávání odstavcového textu - klávesové zkratky : Dobrý den. Prosím o radu jak vytvořit...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=11510&PID=55854&title=zarovnavani-odstavcoveho-textu-klavesove-zkratky#55854 Autor: radimf
Předmět: 11510
Zasláno: 17.zář.2010 v 07:57

Dobrý den. Prosím o radu jak vytvořit lispy pro klávesové zkratky jednotlivých zarovnávání odstavcového textu. Např. zkratka "TDL" by vytvořila mtext se zarovnávání dolní levý.

Mám toto:
(defun C:TDL()
  (command "mtext" (setq bod1 (getpoint)) "Z" "DL" bod1)
  (setq bod1 nil)
)

Funguje, ale problém je v tom, že mi pro zadávání vlastného textu nevyskočí dialogové okno pro psaní odstavcového textu, ale mohu ho zadávat jen v příkazové řádce.

Děkuji za každou radu.


]]> Fri, 17 Sep 2010 07:57:26 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=11510&PID=55854&title=zarovnavani-odstavcoveho-textu-klavesove-zkratky#55854