Uma rotinazinha bem simples que quebrou um galhao outro dia: (defun c:mins2ins (/ ent elist) (vl-load-com) (if (setq ss (ssget ‘((0 . “INSERT”)))) (repeat (sslength ss) (setq ent (ssname ss 0) elist (entget ent ‘(“*”))) (foreach x ‘(44 45 70 71) (setq elist (vl-remove (assoc x elist) elist))) (entmake elist) (entdel ent) (ssdel ent ss))) […]
Criar menus e barras de ferramentas? simples.. ruim é criar os bitmaps dos botões, não é mesmo?Mas pior que isso, é ver aquele monte de bitmaps na pasta do seu programa, totalmente desorganizados, então que tal colocar todos eles numa DLL?É, com ele mesmo o ResHacker, se você já o tem, deve ter a tal
Esses tempos postei uma rotina no forum autolisp que iterava uma lista de elemetos e retornava todas as combinações 2 a 2 possíveis nesta lista, sem repetir e não importando a ordem dos elementos, bom, ela funciona tranquilamente, mas se alguem já testou para um grande número de elementos, notou que ele é um tanto
