| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| | |
 | PNY wird von NVIDIA zum Händler des Jahres gewählt - zum dritten Mal in Folge, eine Pressemitteilung
|
|
Autor
|
Thema: Namensvergabe bei Blöcken (529 mal gelesen)
|
CADmium
Moderator
Maschinenbaukonstrukteur
    
   Beiträge: 13533
Registriert: 30.11.2003 .
|
erstellt am: 16. Dez. 2003 09:21  <-- editieren / zitieren -->   Unities abgeben:          
Hallo Lispler und ACADler, welche Routine ist bei Autocad für die Blocknamesvergabe bei "Als Block einfügen" aus der Zwischenablage verantwortlich? Kann man diese Routine in Lisp nutzen, oder muß man sich selbst was ähnliches "stricken" ( über DATE-Auswertung ect.)? Oder hat von euch schon einer sowas wie einen Zufallsnamenerzeuger, was über einen Time-stamp hinausgeht? Gruß Thomas Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
marvin101010
Mitglied
ingenieur der architektur ohne diplom, bauzeichner ohne lehre, cad-admin ohne wissen :-)
Beiträge: 562
Registriert: 22.01.2003 Pentium 4
Windows XP
Autocad 2002
Autocad 2002LT + Extender
ADT 3.3
ArchiCAD
|
erstellt am: 16. Dez. 2003 09:58 <-- editieren / zitieren --> Unities abgeben: Nur für CADmium 
will ja jetzt nicht kniefieselig sein... aber ein timestamp ist genau das gegenteil eines "zufallsnamenerzeugers". zufällig gewählte namen können niemals eindeutig sein. die zeit isses absolut. ------------------
 ...so long and thanx for all the fish! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Brischke
Moderator
CAD on demand GmbH
Beiträge: 4201
Registriert: 17.05.2001 AutoCAD 20XX, defun-tools (d-tools.eu)
|
erstellt am: 16. Dez. 2003 11:20 <-- editieren / zitieren --> Unities abgeben: Nur für CADmium
Hi, habe mal ein Dingens geschrieben, welches einen Präfix mit Nr. versieht. Man muss dann eben immer nachschauen, ob es die Nr nicht schon gibt. So hat man etwas System und auch einigermaßen sprechende Namen drin. Ist auch ein Ansatz. Grüße Holger ------------------
Holger Brischke
(defun - Lisp over night!
AutoLISP-Programmierung für AutoCAD
Da weiß man, wann man's hat! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
marc.scherer
Ehrenmitglied V.I.P. h.c.
CAD-Administrator
Beiträge: 2494
Registriert: 02.11.2001 Windows 10 64bit
AutoCAD Architecture 2018/2019 (deu/eng)
AEC-Collection 2019 (Revit und Zeugs)
Wenn sich's nicht vermeiden läßt:
D-A-CH Erweiterung (mies implementierter Schrott)
|
erstellt am: 16. Dez. 2003 12:19 <-- editieren / zitieren --> Unities abgeben: Nur für CADmium
Hi, hier mal was zum testen: Code:
;;; Timestamp-Namens-Erzeuger
(defun XX:TIMESTAMP ()
(menucmd "M=$(edtime,$(getvar,date),DD-MONTH-YYYY-HH-MM-SS)"
) ;_ end of menucmd
) ;_ end of defun;;; Random Number Erzeuger
; RANDom-Number called with no parameters
; returns 16 bit integer
(defun RANDOM-NUMBER (/)
;; Pseudo-random number genterator based on MSVC 4.1
;; function 'rand'.
;; Initialize seed for the RNG
(if (not SEEDRAND)
(setq SEEDRAND 1)
) ;_ end of if (setq SEEDRAND (+ (* (fix SEEDRAND) 214013) 2531011))
(boole 1 (/ SEEDRAND 65536) 32767)
) ;_ end of defun
------------------
Ciao,
Marc  Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
fuchsi
Mitglied
Programmierer c#.net Datawarehouse
Beiträge: 1201
Registriert: 14.10.2003 AutoCad Version 2012 deu/enu
<P>Windows 7 64bit
|
erstellt am: 16. Dez. 2003 13:10 <-- editieren / zitieren --> Unities abgeben: Nur für CADmium
|
fca_mi2
Mitglied
Bauingenieur
Beiträge: 508
Registriert: 10.01.2003 ACAD2018
|
erstellt am: 17. Dez. 2003 08:38 <-- editieren / zitieren --> Unities abgeben: Nur für CADmium
|
fuchsi
Mitglied
Programmierer c#.net Datawarehouse
Beiträge: 1201
Registriert: 14.10.2003 AutoCad Version 2012 deu/enu
<P>Windows 7 64bit
|
erstellt am: 17. Dez. 2003 08:57 <-- editieren / zitieren --> Unities abgeben: Nur für CADmium
|
Foren auf CAD.de
| 
