CAD Fórum : vytvoření adresáře https://www.cadforum.cz/forum/ Wed, 13 May 2026 14:20:58 +0000 Thu, 10 Jul 2008 15:32:16 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 https://www.cadforum.cz/forum/RSS_post_feed.asp?TID=6756 <![CDATA[CAD Fórum]]> https://www.cadforum.cz/forum/forum_images/web_wiz_forums.png https://www.cadforum.cz/forum/ <![CDATA[vytvoření adresáře : (vl-mkdir directoryname) nahlásí...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=6756&PID=32939&title=vytvoreni-adresare#32939 Autor: chlebovsky
Předmět: 6756
Zasláno: 10.čvc.2008 v 15:32

(vl-mkdir directoryname)
 
nahlásí tu chybu jedině když directoryname bude nilovej
 
takže mrkněte jestli někde máte
 
(setq directoryname "c:\\........."
 
directoryname - zadaná cesta až k tomu tvořenému adresáři...
]]> Thu, 10 Jul 2008 15:32:16 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=6756&PID=32939&title=vytvoreni-adresare#32939 <![CDATA[vytvoření adresáře : Ferdinand napsal(a): Zkusil...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=6756&PID=32925&title=vytvoreni-adresare#32925 Autor: alfred
Předmět: 6756
Zasláno: 10.čvc.2008 v 11:26

Původně odeslal(a) Ferdinand Ferdinand napsal(a):


Zkusil jsem vl-mkdir ale
<FONT face="Arial, Helvetica, sans-serif" color=#000000>Command: (vl-mkdir directoryname)<FONT face="Arial, Helvetica, sans-serif" color=#000000>; error: bad argument type: stringp nil




Nerozumim... Myslel jsem misto (command "shel" ....) pouzit funkci (vl-mkdir)

takze to pak bude vypadat
(vl-mkdir (strcat "mkdir" " " A2))
nebo tak neco. Vyhoda je, ze neproblikava okno prikazove radky pri provadeni prikazu mkdir.
]]> Thu, 10 Jul 2008 11:26:34 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=6756&PID=32925&title=vytvoreni-adresare#32925 <![CDATA[vytvoření adresáře : Pak jsem na to i vzpomněl (myslím...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=6756&PID=32923&title=vytvoreni-adresare#32923 Autor: Ferdinand
Předmět: 6756
Zasláno: 10.čvc.2008 v 10:47

Pak jsem na to i vzpomněl (myslím že dokonce rada od Alfréda...LOL): D3 nesmí být lokální proměnná - teda
(defun C:ADR1 (/ D1 D2 DWG A1 A2 A3)
...(strcat "mkdir" " " A2) ;"mkdir D:\\akt.adresar\\neshoda_2008-07-10\\" /retezec pro prikaz shell - mkdir/
Zkusil jsem vl-mkdir ale
Command: (vl-mkdir directoryname)
; error: bad argument type: stringp nil
 
]]> Thu, 10 Jul 2008 10:47:49 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=6756&PID=32923&title=vytvoreni-adresare#32923 <![CDATA[vytvoření adresáře : Takhle se da poradit tezko. Jake...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=6756&PID=32901&title=vytvoreni-adresare#32901 Autor: alfred
Předmět: 6756
Zasláno: 09.čvc.2008 v 17:12

Takhle se da poradit tezko.
Jake jsou hodnoty promennych pred provedenim command? Je skutecne v D3 retezec s datumem?
Co vraci (strcat "mkdir" " " A2)

Zkousel jste to projet po krocich ve VisualLispu?

A nakonec proc nepouzijete (vl-mkdir directoryname) ?
:-)]]> Wed, 09 Jul 2008 17:12:22 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=6756&PID=32901&title=vytvoreni-adresare#32901 <![CDATA[vytvoření adresáře : Chci použít jednoduchou pomůcku...]]> https://www.cadforum.cz/forum/forum_posts.asp?TID=6756&PID=32875&title=vytvoreni-adresare#32875 Autor: Ferdinand
Předmět: 6756
Zasláno: 09.čvc.2008 v 09:28

Chci použít jednoduchou pomůcku pro založení podadresáře:
(defun C:ADR1 (/ D1 D2 D3 DWG A1 A2 A3)
  (setq DWG (cadr (fnsplitl (getvar "dwgname"))))
     ;"VYKR33" /nazev akt.vykresu bez pripony/
  (setq A1 (getvar "dwgprefix")) ;"D:\\akt.adresar\\"
  (C:DNES)
  (command "_delay" 250)
  (setq A2 (strcat A1 "neshoda_" D3 "\\"))
     ;"neshoda_2007-12-13\\" /nazev noveho podadresare/
  (command "shell" (strcat "mkdir" " " A2))
     ;zalozi podadresar>> D:\akt.adresar\neshoda_2008-07-09\
  (setq A3 (strcat A2 DWG))  ;"neshoda_2008-07-09\\VYKR33" /retezec-pro ulozeni akt.vykresu/
  (princ)
)
Kde hodnota D3 by se měla vzít z podrutiny DNES - ta poskládá datum z proměnné cdate do řetězce ve tvaru 2008-07-09
Na konci ADR1 ale mi hlásí
Command: ; error: bad argument type: stringp nil
Přitom aplikace DNES je ve výkresu již načtena.
 
]]> Wed, 09 Jul 2008 09:28:54 +0000 https://www.cadforum.cz/forum/forum_posts.asp?TID=6756&PID=32875&title=vytvoreni-adresare#32875