Diskuzní fórum, poradna
CAD diskuze, rady, výměna zkušeností |
Vkládání bloku s atributem |
Odpovědět | archiv |
Autor | |
PepaR
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
CAD/BIM manager Přihlášen: 29.lis.2004 Lokalita: ČR (ZL) Používám: ruky a hlavu (občas ;) Stav: Offline Bodů: 6187 |
Téma: Vkládání bloku s atributem Zasláno: 09.srp.2005 v 07:04 |
Dobrý den, potřeboval jsme si definovat příkaz, který bi mi vložil do určité hladiny blok a pak se vrátil zpět do hladiny aktuální. Bloka má 3 atributy, které jserm poté chtěl editovat (ne vška ještě úpři vkládání, ale až později). Chtěl jsem to obejít anstavením proměnné attdia a attreq na 0, ovšem při pokusu abych mohl zadávat hodnoty a nastavením attreq na 0 se mi namísto dotazu na hodnoty atributu vyplnily textové řetězce... Vyřešil jsme to použitím pause na konci příkazu _insert, avšak tentokráte se mi při snaze o opakovaní příkazu objeví hláška: Příkaz: POPISD
Určete bod vložení popisu dveří : POPISD Neznámý příkaz "POPISD". Stiskněte F1 pro nápovědu. Nemohl by mi někdo podat pomocnou ruku? Předem díky....
PepaR
|
|
Seiner
CAD/BIM manager Přihlášen: 01.říj.2004 Lokalita: ČR (PA) Používám: Mechanical 2017, Inventor 2017 a starší Stav: Offline Bodů: 1662 |
Zasláno: 09.srp.2005 v 07:17 |
Jestli tomu dobře rozumím, pak by mělo stačit dát místo pause jen nějaké dočasné hodnoty atributů (mezery, nebo lépe jejich názvy - to pokud blok neobsahuje kromě atributů nic jiného).
|
|
PepaR
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
CAD/BIM manager Přihlášen: 29.lis.2004 Lokalita: ČR (ZL) Používám: ruky a hlavu (občas ;) Stav: Offline Bodů: 6187 |
Zasláno: 09.srp.2005 v 07:29 |
Ne blok, kromě atributů neobsahuje nic jiného. Nicméně Ty názvy jsou dobrý tip, děkuji, avšak při kombinaci attreq = 1, attdia = 0, se blok vůbec nevloží. |
|
Seiner
CAD/BIM manager Přihlášen: 01.říj.2004 Lokalita: ČR (PA) Používám: Mechanical 2017, Inventor 2017 a starší Stav: Offline Bodů: 1662 |
Zasláno: 09.srp.2005 v 07:39 |
ATTDIA je podle mne vůbec zbytečné v programu řídit. Použil bych _-Insert. |
|
Seiner
CAD/BIM manager Přihlášen: 01.říj.2004 Lokalita: ČR (PA) Používám: Mechanical 2017, Inventor 2017 a starší Stav: Offline Bodů: 1662 |
Zasláno: 09.srp.2005 v 08:02 |
Funguje to, ale buď musíte mít attreq 1 a vkládat nějaké řetězce, nebo si nastavit attreq na 0 a pak nesmíte vkládat nic. jinak se vám vloží řetězce následujících příkazů lispu a program přirozeně havaruje. |
|
PepaR
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
CAD/BIM manager Přihlášen: 29.lis.2004 Lokalita: ČR (ZL) Používám: ruky a hlavu (občas ;) Stav: Offline Bodů: 6187 |
Zasláno: 09.srp.2005 v 08:04 |
Jsem si jit, že se blok při nastavení attreq = 1 nevloží vůbec, čekal jsem že mě to alespoň vyzve pro zadání hodnot atributů na příkazové řádce, ale ono nic. PS: U atributů mám nastaveny výchozí hodnoty, takže když už mě to nevyzve, tak by to mělo vložit blok alespoň s těmito hodnotami, nebo se mýlím? |
|
PepaR
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
CAD/BIM manager Přihlášen: 29.lis.2004 Lokalita: ČR (ZL) Používám: ruky a hlavu (občas ;) Stav: Offline Bodů: 6187 |
Zasláno: 09.srp.2005 v 08:41 |
Již to funguje, měl jsem napsany za pause názvy parametrů, dle první, proto ta chyba... Díky moc a pokdu Vás mohu ještě obtěžovat, tak bych měl sand už poslední dotaz: Nadefinoval jsem si funkci, která mi kreslí tepelnou a zvukovou izolaci, tím že začne kreslit křivku o daném typu čáry v určité hladině. Nejsme žádný programátor a tak jsem byl nucen řešit zadávání bodů pomocí pause, což je jaksi nedostačující. Rád bych to vyřešil pomocí getpoint aby se následné vykreslení provedlo podle zadaných bodů, ovšem potřeboval bych nějaký názorný příklad kde by bylo ukázáno jak getpoint zakomponovat do příkazu pro křivku, nemohl bych Vás tedy ještě jednou požádat o pomoc? Děkuji |
|
Seiner
CAD/BIM manager Přihlášen: 01.říj.2004 Lokalita: ČR (PA) Používám: Mechanical 2017, Inventor 2017 a starší Stav: Offline Bodů: 1662 |
Zasláno: 09.srp.2005 v 09:08 |
Pokud by se jednalo o předem známý počet bodů, pak to není problém: (command "_PLINE" (Getpoint "První bod: ") (Getpoint "Druhý bod: ") (Getpoint "Třetí bod: ") "") Jenže Vy určitě chcete předem neznámý počet bodů. Momentálně mne nenapadá řešení v lispu. Budu dumat. |
|
Seiner
CAD/BIM manager Přihlášen: 01.říj.2004 Lokalita: ČR (PA) Používám: Mechanical 2017, Inventor 2017 a starší Stav: Offline Bodů: 1662 |
Zasláno: 09.srp.2005 v 10:14 |
Tak kreslení křivky (pouze z přímkových úseků) bych asi dělal asi takhle: (setq skup (ssadd)) (While (/= a nil) (Command "_Pedit" (entlast) "_J" skup "" "") |
|
Jan Pajerchin
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Diskutér Přihlášen: 18.čvc.2005 Lokalita: Slovensko Používám: ZWCAD, AutoCAD Stav: Offline Bodů: 78 |
Zasláno: 09.srp.2005 v 10:34 |
A čo tak zmeniť atribúty na typ - prednastavený ? Potom pri vkladaní Vás vôbec nebude otravovať - ale hodnotu môžete dodatočne zmeniť. Len škoda že treba všetky bloky predefinovať. |
|
pavelstyl
Zasloužilý člen Přihlášen: 06.říj.2004 Lokalita: Czech Republic Používám: AutoCAD Mech 2023, SolidEdgeE 2023 Stav: Offline Bodů: 223 |
Zasláno: 09.srp.2005 v 11:15 |
Co třeba takle (psáno z hlavy bez zkoušení). (setq point (getpoint "\nPrvni bod: ")) (command "_pline") (while point (command point) (setq point (getpoint point "\nDalsi bod: ")) ) (command "")
|
|
Seiner
CAD/BIM manager Přihlášen: 01.říj.2004 Lokalita: ČR (PA) Používám: Mechanical 2017, Inventor 2017 a starší Stav: Offline Bodů: 1662 |
Zasláno: 09.srp.2005 v 11:51 |
Jak prosté, dear Whatson!
|
|
PepaR
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
CAD/BIM manager Přihlášen: 29.lis.2004 Lokalita: ČR (ZL) Používám: ruky a hlavu (občas ;) Stav: Offline Bodů: 6187 |
Zasláno: 10.srp.2005 v 06:47 |
Funguje to skvěle až na jednu vadu, nelze ukončit funkci 2x potvrzením (Enter) jako tomu bývá u křivky. Tím pádem je fce přerušena a neprovede se sled příkazů za ní ještě následující.... Nevíte jak tomu prosím Vás předejít?
|
|
pavelstyl
Zasloužilý člen Přihlášen: 06.říj.2004 Lokalita: Czech Republic Používám: AutoCAD Mech 2023, SolidEdgeE 2023 Stav: Offline Bodů: 223 |
Zasláno: 10.srp.2005 v 07:26 |
Mám AutoCAD 2004 Mechanical, příkaz křivka se ukončí pouze 1x ENTER. Pavel Štyl |
|
Seiner
CAD/BIM manager Přihlášen: 01.říj.2004 Lokalita: ČR (PA) Používám: Mechanical 2017, Inventor 2017 a starší Stav: Offline Bodů: 1662 |
Zasláno: 10.srp.2005 v 07:28 |
Proč 2x Enter? Stačí jeden (pravé myšítko) a ukončí se korektně.
|
|
PepaR
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
CAD/BIM manager Přihlášen: 29.lis.2004 Lokalita: ČR (ZL) Používám: ruky a hlavu (občas ;) Stav: Offline Bodů: 6187 |
Zasláno: 10.srp.2005 v 08:12 |
Stačil by jeden Enter (nebo potvrzení), ale při stisku úpravého tlačítka mi vypíše AutoCAD chybu:
Příkaz: IZOLACET
První bod: Další bod: Další bod: Další bod: Další bod: Vyžadován 2D bod nebo klíčové slovo.
"Funkce přerušena"
Určete další bod nebo [Oblouk/Uzavři/Polotloušťka/Délka/Zpět/Tloušťka]: *Storno* Funkce:
(defun C:IZOLACET ()
(izol_tep-start) (setq point (getpoint "\nPrvní bod: ")) (command "_PLINE") (while point (command point) (setq point (getpoint point "\nDalší bod: ")) ) (izol_tep-end) (princ "\n &nb sp; Izolace je kreslena osou &n bsp; \nTloušťka izolace 150mm -> Měřítko typu čáry = 1.5") ) |
|
pavelstyl
Zasloužilý člen Přihlášen: 06.říj.2004 Lokalita: Czech Republic Používám: AutoCAD Mech 2023, SolidEdgeE 2023 Stav: Offline Bodů: 223 |
Zasláno: 10.srp.2005 v 08:20 |
Chybí tam před (izol_top-end) řádek (command ""). Jestli ovšem ten ENTER není v té procedurce ...
|
|
PepaR
Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
CAD/BIM manager Přihlášen: 29.lis.2004 Lokalita: ČR (ZL) Používám: ruky a hlavu (občas ;) Stav: Offline Bodů: 6187 |
Zasláno: 10.srp.2005 v 09:24 |
Děkuji, nějak jsem to přehlédl...
|
|
Pro technickou podporu CAD
kontaktujte Helpdesk
Odpovědět | |
Přejít na fórum | Oprávnění fóra Nemůžete vytvářet nová témata v tomto fóru Nemůžete odpovídat na témata v tomto fóru Nemůžete vymazávat vaše příspěvky v tomto fóru Nemůžete upravovat vaše příspěvky v tomto fóru Nemůžete vytvářet ankety v tomto fóru Nemůžete hlasovat v anketách v tomto fóru |
Stránka byla vygenerována za 1,133 sekund.