AutoCad - 03. Σχεδιασμός 2D, ιδιότητες αντικειμένων, διασύνδεση χρήστη (interface), κλπ

[ALDEBARAN]

Έχω μια απορία για το AUTO CAD .

Σε κάποια αρχεία δεν λειτουργεί η ΕΝΤΟΛΗ "Paste to original coordinates"

Υπάρχει κάποιο κλείδωμα γιατί κατά καιρούς χρειάζεται να αντιγράψω κάποιο τμήμα αρχείου και διαπιστώνω ότι αυτή η εντολή είναι απενεργοποιημένη . Μπορεί κάποιος να με βοηθήσει;

[petsagouris]

@ALDEBARAN: Μήπως προσπαθείς να το κάνεις ανάμεσα σε αρχεία που είναι σε διαφορετικό format (πχ dwg 2004 σε dwg 2007), ή προγράμματα διαφορετικών εκδόσεων (πχ civil 200a σε autocad 200b); Σε αυτήν την περίπτωση μια καλή λύση είναι η χρήση του wblock. (κοίτα το manual του AutoCAD για οδηγίες χρήσης)

[petsagouris]

Μπορείς να χρησιμοποιήσεις το παρακάτω lispάκι.

 

Το βρήκα απο εδώ http://bit.ly/kv1I

 

Απο το μενού Tools -> AutoLISP -> Load Application...

επιλέγεις το αρχείο που έχεις σώσει τον παρακάτω κώδικα (κοίτα οδηγίες στο τέλος για το πως)

και πάτα Close

 

μετά στην γραμμή εντολών δώσε 'tlen' αφού επιλέξεις τα αντικείμενα που θέλεις να μετρήσεις.

 

 

>;|

TLEN.LSP - Total LENgth of selected objects
(c) 1998 Tee Square Graphics

|;

(defun C:TLEN (/ ss tl n ent itm obj l)
 (setq ss (ssget)
       tl 0
       n (1- (sslength ss)))
 (while (>= n 0)
   (setq ent (entget (setq itm (ssname ss n)))
         obj (cdr (assoc 0 ent))
         l (cond
             ((= obj "LINE")
               (distance (cdr (assoc 10 ent))(cdr (assoc 11 ent))))
             ((= obj "ARC")
               (* (cdr (assoc 40 ent))
                  (if (minusp (setq l (- (cdr (assoc 51 ent))
                                         (cdr (assoc 50 ent)))))
                    (+ pi pi l) l)))
             ((or (= obj "CIRCLE")(= obj "SPLINE")(= obj "POLYLINE")
                  (= obj "LWPOLYLINE")(= obj "ELLIPSE"))
               (command "_.area" "_o" itm)
               (getvar "perimeter"))
             (T 0))
         tl (+ tl l)
         n (1- n)))
 (alert (strcat "Total length of selected objects is " (rtos tl)))
 (princ)
)

Για να αποθηκεύσεις τον παραπάνω Lisp κώδικα θα πρέπει να ανοίξεις το Σημειωματάριο (Notepad.exe) των Windows (προσοχή: όχι το wordpad!) και να επικολλήσεις τον κώδικα. Αποθήκευσε το ως 'tlen.lsp' σε όποιο σημείο στο δίσκο επιλέξεις.

[d2m]

Ξαφνικά και απρόσμενα δεν λειτουργεί το Ctrl+c...+v...+r...

Όλοι οι συνδιασμοί έχουν ως αποτέλεσμα cancel (σαν να πατάω escape)

Καμμιά ιδέα?

[iovo]

μήπως τό χεις στα Eλληνικά?

[d2m]

το autocad? όχι

λείτουργούσε μια χαρά μέχρι τώρα......

Ξαφνικά σταμάτησε και χωρίς να έχω εγκαταστήσει ή αλλάξει κάτι....

[petsagouris]

Πήγαινε στο Tools->Customize...->Keyboard Shortcuts

 

και έλεγξε ότι υπάρχουν τα shortcuts όπως τα θες.

 

Ποια έκδοση είναι το AutoCAD?

[d2m]

2007 και δυστυχώς και αυτό το έχω κάνει αλλά δεν.....

[petsagouris]

Δεν υπάρχουν τα shortcuts;

Αν δεν υπάρχουν είναι πρόβλημα του AutoCAD και θα λυθεί,... ίσως να καταφέρω να σου δώσω ένα .cui απο το δικό μου AutoCAD2007.

Αν υπάρχουν και δεν λειτουργούν είναι πρόβλημα των Windows, αυτό μπορείς να το τσεκάρεις με το να τα χρησιμοποιήσεις σε ένα άλλο πρόγραμμα πχ Word...

[d2m]

Το αρχείο .cui και ta shortcuts φαίνονται να είναι μια χαρά... Θα πάρω ένα αρχείο από άλλο υπολογιστή που δεν παρουσιάζει πρόβλημα και θα ενημερώσω αν λυθεί.....

Σε όλα τα άλλα προγράμματα λειτουργεί κανονικότατα.

 

 

Ενημερώνω.... ΔΕΝ λύθηκε

 

Ενημέρωση νο2

Τα κατάφερα τελείως τυχαία. Μάλλον από απελπισία.

Φόρτωσα το default profile του autocad, με αποτέλεσμα φυσικά

να αλλάξουν οι ρυθμίσεις οθόνης και οι διάφορες επιλογές, αλλά το ctrl+c κλπ επανήλθε.

Ξαναρύθμισα οθόνη και επιλογές και όλα καλά.

Ευχαριστώ για το ενδιαφέρον