Yeni bir başlık gönderCevap gönder 1. sayfa (Toplam 1 sayfa)   [ 3 mesaj ]
Yazar Mesaj
 Mesaj Başlığı: dim problemleri
MesajGönderilme zamanı: 17 Oca 2003 03:07 

Kayıt: 15 Kas 2001 20:57
Mesajlar: 15
Konum: Turkey
Selamlar,
Daha önceki sorularımda belirttiğim bazı dim problemleri çözülebiliyor , vertical dimensindaki mirror problemi , bir lisp ile düzeldi , vertical yerine aligned kullanmak başka sorunlara yol açabiliyor , birde dim text edit komutundaki hata vardı , bu da lisp ile düzeldi , dim text artık dim line dan bağımsız hareket edebiliyor "hemde dimler patlatılmadan" , bu problemlerden muzdarip olanlar varsa , bildirirlerse kendilerine yollarım.

Ancak , dim ayarlarının sürekli bozulması ve defalarca set edilmesi gerekliliği devam ediyor , ve birde kilitlenmeler.Bu problemlerinde yeni versiyonda düzeleceğini umuyorum.
Selamlar


Başa Dön
 Profil  
 
 Mesaj Başlığı:
MesajGönderilme zamanı: 04 Şub 2003 20:02 
Site Admin

Kayıt: 07 Oca 2002 13:14
Mesajlar: 1085
Konum: Turkey
Lisplerinizi foruma kendi adınızla koyarsanız hem biz hem de tüm kullanıcılarımız memnun olur zannediyoruz.

Bu önerimiz tüm kullanıcılarımız için geçerli. Forumumuzun bir amacı da, kullanıcılarımızın da birbirleri ile yardımlaşması ve haberleşmesini de sağlamaktır.


Başa Dön
 Profil  
 
 Mesaj Başlığı:
MesajGönderilme zamanı: 27 Şub 2003 13:34 
Site Admin

Kayıt: 07 Oca 2002 13:14
Mesajlar: 1085
Konum: Turkey
drafter'ın göndermiş olduğu lisp programını aşağıya aldık:

<pre id=code><font face=courier size=2 id=code><font color=green>;; Bu program ölçü yazısının yerini, ölçü çizgisine
;; dik uzaklığını sabit tutarak değiştirir</font id=green>
(defun c:ted (/ e1 as more pnt)
(setq e1 (car (entsel "\nText'i seçin: ")))
(setq as (entget e1))
(if (< (cdr (assoc 70 as)) 128)
(setq as (subst (cons 70 (+ 128 (cdr (assoc 70 as)))) (assoc 70 as) as))
)
(setq more T)
(while more
(setq pnt (grread t))
(if (= (car pnt) 3) (setq more nil))
(setq as (subst (cons 11 (cadr pnt)) (assoc 11 as) as))
(entmod as)
)
(prin1)
)</font id=code></pre id=code>


Başa Dön
 Profil  
 
Eskiden itibaren mesajları göster:  Sırala  
Yeni bir başlık gönderCevap gönder 1. sayfa (Toplam 1 sayfa)   [ 3 mesaj ]


Kimler çevrimiçi

Bu forumu gezen kullanıcılar: Hiç bir kayıtlı kullanıcı yok ve 17 misafir


Bu foruma yeni başlıklar gönderemezsiniz
Bu forumdaki başlıklara cevap veremezsiniz
Bu forumdaki mesajlarınızı düzenleyemezsiniz
Bu forumdaki mesajlarınızı silemezsiniz
Bu foruma eklentiler gönderemezsiniz

Aranacak:
Geçiş yap:  


Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
610nm Style by Daniel St. Jules of Gamexe.net


Türkçe çeviri: phpBB Türkiye