Tek Mesaj Görüntüle
Eski 21-04-2006, 15:15   #45
orhunkeskinbicak
Arkitera Üyesi
 
orhunkeskinbicak'in Avatar'ı
 
Kayıt Tarihi: 27-12-2005
Mesaj: 501
bazen birden fazla objeyi kopyalarken yanlış noktaya yerleştiririz.

ve move "P" (Previous) yaparak son kopyaladığımız objeyi seçmek isteriz
yada move "L" (Last) son çizilen objeyi kolaylıkla seçmek isteriz hiç başınıza geldimi bilmiyorum P yapınca önceki seçim grubunu seçer ama seçmek istebiğimiz onlar değildir
L desek son çizilen tek objeyi yakalar ama biz onu daseçmek istemiyoruz kopyaladığımız tüm objeleri seçmek istiyoruz ne yapacan mecbur undo yap tekrar copy elin mahkum
o karışık çizim içerisinden tektek yanlış kopyaladıklarını seçip silemezsinde işde bu problemi Autodesk de çözmemiş ben çözeyim dedim ve aşağıdaki lispi yazdım

copy/paste yapın komut satırına aşağıdaki kodu ve copy komutunu tekrar deneyin
yada lisp gibi kopyalayıp yükleyin lisp copy komutunu çalışmaz hale getirip yerine bu lispi
çalıştırıyor yanlız klavyeden komutu yazmanız gerekiyor COPY yada kendi belirlediğiniz (PGP) kısayolla çalıştırmalısınız toolbarlardan yine normal çalışıyor ayrıca türkçe

copy yapın bir grup objeyi daha sonra move p yi deneyin farkı göreceksiniz

(command "undefine" "copy" )(defun c:copy ()

(princ "\nObjeleri Seçiniz")

(if (/= (setq set1 (ssget)) nil)

(progn
(setq nokta1 (getpoint "\nDeğişken temel noktayı mıhlayınız:"))
(while
(setq
nokta2 (getpoint
nokta1
"\nDeğişken diger nokta mıhlayınız yada <çıkış>:"
)
)
(command "_.copy" set1 "" nokta1 nokta1)
(command "_.move" "p" "" nokta1 nokta2)
(setq nokta1 nokta2)
)
(princ
"\nAslansın be! kopyaladın karbon kagıdı gibisin mubarek!"
)
)
(princ "\nBi Sey secmedin seçim yapmalısın")
)

(princ)

)
__________________
Ars Longa, Vita Brevis
orhunkeskinbicak offline   Alıntı Yaparak Yanıtla