Autocaddeki çizimlerimde elle ölçülendirme yapıyorum (ölçeksiz çizimlerde).oluşturdugum text ya metextlerde ölçüyü elle girdikten sonra sonuna sürekli 'm' yazmak durumunda kalıyorum. bunun daha pratik bi yöntemi var mıdır?yani ben ölçüyü yazdıgımda sonuna otomatik olarak m yazdırılabilir mi?
Command satırına dimstyle yazın, geçerli dimenison style ı için modify diyip yukarıdaki pencereye gelin. Prefix ölçünün başına suffix ise sonuna girilen yazıyı yazdırır.
Text ve Mtext sonuna yazı eklemek için;
Kod:
(defun c:ek (/ ek gt ob)
(setq ek (getstring t "\nEk: ") gt (ssget '((0 . "*text"))) n 0)
(setvar "cmdecho" 0) (command "_.undo" "be")
(if gt (repeat (sslength gt)
(setq ob (entget (ssname gt n)) n (1+ n))
(entmod (subst (cons 1 (strcat (cdr (assoc 1 ob)) ek)) (assoc 1 ob) ob))))
(command "_.undo" "e") (princ))
Değeri değiştirilmemiş (otomatik) Dimension'larda DIMPOST Sistem değişkenine uygun değerler vererek (veya Travaci arkadaşımızın verdiği yöntemle) Dimension Text'e Prefix (önek) ve suffix (sonek) atayabilirsiniz. Bununla birlikte, Dimension Text manuel olarak (elle) değiştirildiğinde bu önek ve sonek değerleri supress edilir (baskılanır). Yani, değeri elle girilmiş Dimension yazılarının hepsi için geçerli bir son ek vermek mümkün olmaz.
Travaci arkadaşımıza öneri:
- DIMPOST değerini okunan SonEk olarak ayarlamalı.
- ssget seçim seti süzgecini (*text,dimension) şeklinde değiştirip, dimensionlar da seçilebilmeli.
- reppeat döngüsü içinde seçim setindeki nesne kontrol edilerek;
-- Dimensin ise, Dimension Text'in <> olmaması durumunda sonunda SonEk olup olmadığı kontrol edilmeli, SonEk yoksa eklenmeli.
-- Seçim setinde sırası gelen ve ele alınan nesne *text ise sonunda SonEk olup olmadığı kontrol edildikten sonra, yoksa SonEk eklenmeli.
Diye düşünüyorum.
Aksi halde kullanıcı özensiz ve tedbirsiz davrandığında karmaşaya sebep olabiliriz.
Hocam doğru söylüyorsunuz, yazmadan önce bende dediklerinizi düşündüm, gönülde öyle paylaşmak isterdi ama sınavlarım olduğundan okadar vakit ayıramıyacağım, sadece görebildiği kadar iş görsün diye karaladım :) Birazda istenileni net anlayamadım oda caydırmadı değil. O yüzden de iki şekilde cevapladım.
Kullanıcı arkadaşların dikkatine;
- SonEk eklenecek nesne olarak Edit edilmiş veya edilmemiş Dimension'lar ile Text ve MText nesneleri seçilebilir.
- Seçilen nesneler arasında çok satırlı MText'ler varsa yalnızca en son satırın sonuna SonEk ekler.
- Seçilen nesnelerde zaten bir son ek varsa, bu durum kontrol edilmeden tekrar SonEk eklenir.
