Forum
Download
Galeri
Üye Ol
|
Giriş
AutoCAD
•
AutoLISP
•
Programlama
•
Püfler
•
Komutlar
•
Terimler
•
Eğitim
aLd
•
TCad
•
FacadeCAD
•
Cephe Kot
•
HQ Library
•
FreeMUST
•
Pasdoc.A
Forumlar
>
AutoCAD
>
Seçili olan sayılara (metinlere) belirlenen bi sayıyı ekleme
89088
19.07.2021 18:17
asamet
1 den 500 e kadar sıralanmış sayılar var. Bunların hepsine; örneğin 400 sayısını eklemek istiyorum. Yani 401, 402 ... 899, 900 şeklinde. Bu metinleri topluca seçip istediğim sayıyı eklememin bir yöntemi var mı?
89100
23.07.2021 12:28
alumina
Alıntı
asamet :
Kod:
(defun c:qw (/ dc ns nm z en nn)
(vl-load-com)
(if (and (setq dc (vla-get-ActiveDocument
(vlax-get-acad-object))
ns (ssget '((0 . "*Text"))))
(setq nm (getreal "\nEnter the number to add:")))
(progn (vla-StartUndomark dc)
(repeat (setq z (sslength ns))
(setq z (1- z)
en (entget (ssname ns z))
nn (assoc 1 en))
(entmod (subst (cons 1 (rtos
(+ (atof (cdr nn)) nm) 2)) nn en)))
(vla-EndUndomark dc)
)
) (prin1)
)
89139
23.08.2021 10:43
asamet
Elinize sağlık çok sağolun, teşekkür etmeyi unutmuşum.
>
1
<
Copyright © 2004-2022 SQL: 0.905 saniye - Sorgu: 47 - Ortalama: 0.01926 saniye