04.04.2008 09:17

35293    

zoom komutunu girdikten sonra köşeden tutmak için osnap kullanamıyoruz bunun için endpointten yakalaması için komuta girdikten sonra end yazmamak için bir lisp yazdım ama ikinci kez tekrar endpoint sormalıki diğer köşeyi seçebileyim yani sonuç olarak komut adı z olsun z ye basıcam end tıkla diyecek tıkladıktan sonra bir daha end istiyecek ve ben zoom işlemini osnaptan dolayı comut satırına iki kere endpoint yazmak durumunda kalmıcam

04.04.2008 11:19

35301    

ilave ettim wolf tam olarak ne isteddğini anlamamış olabilir..

04.04.2008 12:10

35303    

Alıntı

---

xxxeee :
maalesef yine olmadı antet köşesine geldiğimde end snapını görücem ve tıklıcam sonra karşı alt çaprazına gidicem ve end ile yine yakalıcam yani sanki çıktı alıyormuş gibi anteti window içine alıcam iki tane end gerekli bir sol üst birde sağ alt sanırım yeterince net anlatabildim yardımlarınız için teşekkür ederim.

---

istersen çizimi gönder, dediğin şekilde çizim üzerinde ben deniyorum oluyor ! acaba senin çizim ayarlarında mı bir problem var ?

04.04.2008 12:58

35305    

aslında boyle bir iş için lisp'e gerek yok, ben aşaığıdaki lispi yüklediğimde dikdörtgenin ters uçlarını end point' lerinden tutup zoom yapabiliyorum, sende niye olmuyor anlamış değilim ?

(defun c:zz ()
(setq eski_os(getvar "osmode")) ; mevcut osnap ayarını kaydet
(setvar "osmode" 1); sadece end point osnap açık
(setq zw1 (getpoint "\n Birinci köşeye tıklatın > "))
(setq zw2 (getcorner zw1 "\n Diğer köşeye tıklatın > "))
(command "zoom" zw1 zw2 )
(setvar "osmode" eski_os); işlem bittikten sonra eski osnap ayarına getir
)


* zoom yaparken toolbarsta ki "osnap end" komutlarını kullanmayı dene !