|
AutoLisp : Attribute umbenennen
Manuel Sauter am 22.03.2004 um 15:53 Uhr (0)
Hallo Zusammen, ich habe mehrere hundert Zeichnungen in denen ein Attribut geändert werden soll. Beispiel: Ich habe die Zeichnung eines Tisches mit einem Attribut, das beim Einfügen versteckt bleibt, welches die Bezeichnung und Artikelnummer beinhaltet. Tisch_00-111-22. Jetzt würde ich gerne das Attribut ändern in Tisch_00-111-22_N_K. Gibt es hier eine Möglichkeit eine Routine zu erstellen das mir alle Zeichnungen öffnet, das Attribut ändert und anschließend wieder schließt? Ich habe im Forum gelesen das d ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Runden von einer reellen Zahl in Gazzahl
Manuel Sauter am 28.06.2004 um 14:38 Uhr (0)
Hallo Zusammen, habe folgendes Problem! Die beiden Variablen nBelBrW1 und nBelBrW2 werden berechnet und anschließend unter einen neuen Variable in eine Ganzzahl geändert. (setq nBelBrW1 (- (+ nWst2 iIes ) iAes) nBelBrW2 (- (+ nWst1 iIes ) iAes) eBelBrW1 (fix nBelBrW1) eBelBrW2 (fix nBelBrW2) ) Bei der Überprüfung der Variablen nBelBrW1 und nBelBrW2 werden z.B die Werte 750.0 für beide Variablen angezeigt. Bei der Überprüfung der Variablen eBelBrW1 u ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Attributsdefinition auslesen
Manuel Sauter am 24.03.2004 um 14:30 Uhr (0)
Hallo Zusammen, ich brauche nochmals Eure Hilfe. Nachdem ich nun meine Mutterzeichnungen mit der Attributsdefinition ARTICLENUMBER mit dem Vorgabewert TISCH_##-###-##_N_K abgeändert habe, wollte ich diese mit der Befehl _-eattext auslesen und in eine Textdatei schreiben. Da ich nur den Layer und die Attributsdefinition auslesen möchte brauche ich eine Vorlagedatei. Jetzt ist mir aufgefallen das ich jeden Artikel in diese Vorlagedatei einbringen muß um ein korrekte Textdatei zu erhalten. Meine Frage n ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Gleicher Wert in einer Liste finden
tom.berger am 10.05.2004 um 21:52 Uhr (0)
Zitat: Original erstellt von Manuel Sauter: Hallo Zusammen, ich habe eine Liste mit zugelassenen Wandstärken (setq zulWst (list 50.0 100.0 150.0 200.0 250.0 300.0 350.0)) Aus einer Berechnung erhalte ich die tatsächliche Wandstärke nWst1 Nun würde ich gern überprüfen ob die errechnete Wandstärke in der zulässigen Liste vorhanden ist. Aus den Beiträgen des Forums habe ich erkannt das ich mit member nicht weit komme. Ich denke ich muß mit dem Befehl equal arbeiten, da ich hier ja kleine Abweichungen von ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Runden von einer reellen Zahl in Gazzahl
tom.berger am 28.06.2004 um 15:29 Uhr (0)
Zitat: Original erstellt von Manuel Sauter: ich möchte garnicht Runden, sonder nur die Nachkommastellen weg haben. Nein, ich glaube nicht, dass Du das wirklich willst :-) Reelle Zahlen gibt s auf Computern nicht wirklich, denn zu deren Darstellung würden wir exakt unendlich viel Speicher benötigen. Statt dessen verwenden wir prinzipiell nur näherungsweise Dezimalzahlen mit endlicher Genauigkeit, und dadurch kann es nach einer Anzahl von Rechenoperationen schon mal vorkommen, dass ein Ergebnis nic ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Fehler beim Blockeinfügen abfangen
Manuel Sauter am 01.03.2004 um 09:16 Uhr (0)
Hallo Thomas, danke für den Tip. Jetzt funktioniert es. Ich mußte aber vorher der zu überprüfenden Variable den vollständigen Blocknamen zuweisen. ;;;Auswahl der Einfügeansicht (initget G A S ) (setq cPrompt (strcat Auswahl Grundriss/Ansicht/Schnitt cLage : ) cLage (cond ((getkword cPrompt)) (T cLage)) ) (cond ((= cLage G ) (setq b cEKname)) ((= cLage S ) (setq b (strcat cEKname S ))) ((= cLage A ) (setq b (strcat cEKname A ))) ) ;;;Überprüfen ob der Block vorhanden ist (setq fn (strc ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Fehler beim Blockeinfügen abfangen
Manuel Sauter am 27.02.2004 um 14:43 Uhr (0)
Hallo Zusammen, hier meine Routine zum Blockeinfügen: ;;;Auswahl der Einfügeansicht (initget G A S ) (setq cPrompt (strcat Auswahl Grundriss/Ansicht/Schnitt cLage : ) cLage (cond ((getkword cPrompt)) (T cLage)) ) (cond ((= cLage G ) (setq b cEKname)) ((= cLage S ) (setq b (strcat cEKname S ))) ((= cLage A ) (setq b (strcat cEKname A ))) ) ;Wenn der Block schon vorhanden ist, soll dieser benützt werden (setq INS-EXIST (tblsearch BLOCK b)) (if INS-EXIST (setq eEL b)) ;Einfügen des Bloc ...
|
| In das Form AutoLisp wechseln |
