|
Autocad VBA : Rechteck schraffieren
mapcar am 18.10.2004 um 09:17 Uhr (0)
Dim outerLoop( 0 To 0 ) As AcadEntity Das sieht erstmal reichlich merkwürdig aus... Kann eigentlich nur (wenn Option Base == 0) eine Boundary mit 1 Stützpunkt werden. Wenn ich Acad wäre, würde ich die auch zurückweisen;-) Gruß, Axel Strube-Zettler ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man s hat Meine AutoLisp-Seiten Mein Angriff auf dein Zwerchfell Mein Lexikon der Fotografie Mein gereimtes Gesülze
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Rechteck schraffieren
mapcar am 18.10.2004 um 11:52 Uhr (0)
Na ja, das ist doch keine Profi-Mathematik: Wenn dein Boundary 4 Stützpunkte haben soll, dann muss das Array auch 4 Elemente haben. Du definierst das Array aber mit einem Element, und dann überschreibst du dieses Element dreimal, sodass letztendlich nur der letzte (vierte) Punkt drinsteht. Das kann doch nix werden;-) Also: Code: Option Base 0 ... Dim MyArray (0 To 3) As Irgendwas MyArray(0) = ... MyArray(1) = ... MyArray(2) = ... MyArray(3) = ... Gruß, Axel Strube-Zettler ------------------ (defun ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Rechteck schraffieren
mapcar am 18.10.2004 um 11:56 Uhr (0)
Da war Fuchsi etwas schneller als ich... Aber, Fuchsi, du nimmst ihm das Nachdenken völlig ab. Fertigcode zum Reinkopieren, und der Lerneffekt ist gleich Null;-) Gruß, Axel Strube-Zettler ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man s hat Meine AutoLisp-Seiten Mein Angriff auf dein Zwerchfell Mein Lexikon der Fotografie Mein gereimtes Gesülze
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Rechteck schraffieren
mapcar am 18.10.2004 um 14:02 Uhr (0)
Ich will dir ja nicht auf den Schlips treten, aber wenn du Arrays nicht indizieren kannst, bist du von super programmieren noch ziemlich weit entfernt. Dazu gehört auch die Base-Option, das ist eigentlich ein Klacks, da mal einen Blick in die Hilfe zu werfen. Das Ganze war doch auch gar kein AutoCAD-Problem, sondern ein VB-internes, das hättest du genauso in einem Excel-Programm haben können. Auch dein letztes Problem mit dem Durchreichen des Basispunktes ist überhaupt nicht AutoCAD-spezifisch. Das ist e ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Rechteck schraffieren
mapcar am 18.10.2004 um 23:56 Uhr (0)
Ich habe zufällig im September eine Kurzgeschichte mit dem Titel Option Base 0 geschrieben, anlässlich einigen Ärgers, den ich mit meinem neuen Scanner hatte. Die will ich euch doch nicht vorenthalten - ich hoffe, der Moderator dieses Forums haut mich nicht gleich;-) Option Base 0 Schön, elegant, schwarz und silber, so ziert er jetzt meinen Schreibtisch, der neue Scanner. Er hat einen Haufen Geld gekostet - na ja, nicht so viel wie mein erster, aber das war vor 10 Jahren. Die Preise sind inzwischen gef ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Rechteck schraffieren
mapcar am 19.10.2004 um 14:24 Uhr (0)
Darfst du, solange mein Name drunter stehen bleibt. Tja, nur (substr ...) kocht ein eigenes Süppchen;-) Gruß, Axel ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man s hat Meine AutoLisp-Seiten Mein Angriff auf dein Zwerchfell Mein Lexikon der Fotografie Mein gereimtes Gesülze
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Rechteck schraffieren
mapcar am 19.10.2004 um 22:41 Uhr (0)
Proxy, da reichts auch, wenn ich den Stecker von der Durchlichteinheit abziehe, gibt auch eine schöne unbunte Farbe. Die Nummern vergibt er trotzdem, wie er will;-) Und was meine Publikation hier betrifft, steht s immer noch 2:1... Ich konnte einfach nicht anders, hat grad so schön gepasst. Gruß, Axel Strube-Zettler ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man s hat Meine AutoLisp-Seiten Mein Angriff auf dein Zwerchfell Mein Lexi ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Rechteck schraffieren
mapcar am 20.10.2004 um 00:21 Uhr (0)
Hmmmm, ich will ja auch nicht, dass das VBA-Forum zu irgendwas Zauberhaftem oder einem A-Corner wird. Aber wirklich off-topic war s ja doch nicht, eher eine etwas persönliche Antwort auf die Frage Was bedeutet Option Base ? . Aber im Ernst: Muss denn immer alles so ernst sein? Gruß, Axel Strube-Zettler ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man s hat Meine AutoLisp-Seiten Mein Angriff auf dein Zwerchfell Mein Lexikon der Fo ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Rechteck schraffieren
mapcar am 21.10.2004 um 12:37 Uhr (0)
der Bäcker würde feststellen, dass es einen Run auf sein Geschäft gibt, denn die Leute zahlen immer ein Stück weniger. In diesem Satz offenbart sich nun die ganze Tragik der Geschichte, hier werden nämlich Benummerung und Anzahl völlig durcheinandergeworfen. Ob besagte Bäckereifachverkäuferin erst das Vollkornschmandstückchen (nebenbei: was ist eigentlich Vollkornschmand? -- Sollte das nicht besser Schmand-Vollkornstückchen heissen?) mit der Nummer 0 und dann vier weitere auf die Pappe legt (mit den ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Rechteck schraffieren
mapcar am 21.10.2004 um 14:09 Uhr (0)
na, dann hab ich das falsch verstanden;-) ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man s hat Meine AutoLisp-Seiten Mein Angriff auf dein Zwerchfell Mein Lexikon der Fotografie Mein gereimtes Gesülze
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Auslesen von Blockeigenschaften mittels VBA möglich?
mapcar am 13.11.2004 um 14:25 Uhr (0)
Sieht so aus... Deswegen erfolgt jetzt eine administrative Maßnahme: Ich schließe diesen Thread, er ist sowieso schon viel zu lang. Einzelfragen können ja in neuen Threads gestellt werden. Gruß, Axel Strube-Zettler ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man s hat Meine AutoLisp-Seiten Mein Angriff auf dein Zwerchfell Mein Lexikon der Fotografie Mein gereimtes Gesülze
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : „Ein bisschen Theorie ist manchmal auch ganz nützlich“
mapcar am 07.11.2004 um 20:13 Uhr (0)
Nee Moony, so von oben herab war das überhaupt nicht gemeint. Es war lediglich als präventiver Hinweis gedacht für den folgenden Fall: Wer Rechtecke sucht, muss technisch besehen Polylinien suchen. Das sind nämlich die Entities, während das Konzept Rechteck in der Geometriedatenbank unbekannt ist. Und dann ist man ruckzuck bei der Aufgabenstellung Wie schreibe ich eine Funktion, die feststellt, ob eine Polylinie ein Rechteck darstellt? Das klingt trivial, dürfte aber viele schon vor echte Probleme st ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : setXData
mapcar am 28.07.2005 um 12:52 Uhr (0)
Hi Nancy! Ich will noch mal versuchen, dir (und jedem, den s interessiert), das mit dem Appname zu erklären: Jede Applikation, auch deine, sollte *einen* eindeutigen Namen haben. Das hat folgende Vorteile: 1. Man kann Entities danach filtern (z.B. mit Befehlen oder ssget in Lisp) 2. Man bringt nicht die AutoCAD-EEDs mit den eigenen durcheinander 3. Man bringt nicht die eigenen Daten mit denen einer anderen Applikation durcheinander Mit einer Zeile wie oTxt.GetXData "", xType, xDat tust du aber genau das ...
|
| In das Form Autocad VBA wechseln |
