Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 08/05/2019 in all areas

  1. ronjonp
    You'd probably be better off creating a template with your tablestyle in it then importing.
    1 point
  2. dlanorh
    OK. Can I also switch the positions of offsets and levels so it is consistent with Option 1?
    1 point
  3. Lee Mac
    Another, assuming your strings conform to the format of ending with 3 digits - (defun foo ( l ) (mapcar '(lambda ( n ) (nth n l)) (vl-sort-i (mapcar '(lambda ( x ) (atoi (substr x (- (strlen x) 2)))) l) '<) ) ) _$ (foo '("ABC-ABD.002" "ABD.003" "ABD.001" "ABD.110" "ABC-ABD.050")) ("ABD.001" "ABC-ABD.002" "ABD.003" "ABC-ABD.050" "ABD.110")
    1 point
  4. Tharwat
    (setq lst '("ABC-ABD.002" "ABD.003" "ABD.001" "ABD.110" "ABC-ABD.050")) (vl-sort lst '(lambda (j k) (< (read (substr j (+ 2 (vl-string-search "." j)))) (read (substr k (+ 2 (vl-string-search "." k)))) ) ) )
    1 point
  5. BIGAL
    Have you tried Bpoly it uses a pick point and makes a boundary. (command "_.Bpoly" (getpoint) "") (command '_.BPoly" (getpoint) "")
    1 point
×
×
  • Create New...