|
AutoCAD VBA : AutoCAD plotten
alfred neswadba am 23.03.2009 um 14:41 Uhr (0)
Hi,Du hast in der VBA-Hilfe ein Beispiel für GetCanonicalMediaNames, und wenn du das richtige in der Liste gefunden hast, kannst Du das dem Layout zuweisen.Siehe z.B. hier (3.ter Beitrag), ist ein kleines Beispiel von Auflisten und Zuweisen.- alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AutoCAD plotten
alfred neswadba am 23.03.2009 um 16:37 Uhr (0)
Hi, Zitat:Im Moment warte ich wann der Plotter frei wird und will testenDu brauchst aber zum Testen Deines Programms nicht km-weise Papier Es gibt auch PlotToFile - alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AutoCAD plotten
facebraker am 24.03.2009 um 11:44 Uhr (0)
Hallo Alfred,neee, klar kann ich auch in Datei drucken, ich wollte es nur mal auf dem Plotter checken;-)Ich muss aber gestehen, dass ich heut Morgen die Programmierumgebung gewechselt habe, ich bin aufVB.NET 2005 und COM gegangen. ich fand es im VBA zu mühseelig mit dem Arrays, mit .NET habe ichbessere Möglichkeiten im Framework. Z.B. Mehrere Dateien mit dem FileOpenDialog usw.Aber an der Syntax und den Objekten ändert sich ja prinzipell nichts, habe den Code 1:1 übernommen, aber anstatt Code:set Objekt = ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AutoCAD plotten
gerhard123 am 24.03.2009 um 12:40 Uhr (0)
Hallo FB,ich erstelle auch atomatisiert PDF-Plots.anbei mirn Progamm mit dem ich arbeite, vielleicht kannst du damit was anfangen.Public Sub pdfPlot() Dim m_oDoc As AcadDocument Dim m_oLayout As AcadPlotConfiguration Dim dwgPfad, dwgName, strFilename As String dwgPfad = ThisDrawing.GetVariable("dwgPrefix") + "DWG" pdfName = Replace(LCase(ThisDrawing.GetVariable("dwgName")), ".dwg", ".pdf") strFilename = dwgPfad + pdfName Dim oPlotConfig As AcadPlotConfiguration Dim strFilename As String Dim Layout, plott ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AutoCAD plotten
facebraker am 24.03.2009 um 14:14 Uhr (0)
Hallo Gerhard,ich habe mir mal dein Programm angesehen, aber das was ich wissen will ist leider nicht drin,so wie ich den unten zitierten Teil intepretiere, wird mit einem Lisp-Programm das das Format zurückgibtund dieses dann im Plot setzt, mir fehlt aber das Lisp-Programm. Zitat:Original erstellt von gerhard123: Format = ThisDrawing.GetVariable("users3") Format wir mit Lispprogramm ermittel ausrichtung = ThisDrawing.GetVariable("users5") Ausrichtung H/Q - FormatSelect Case Format Case Is = "A ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AutoCAD plotten
facebraker am 24.03.2009 um 15:29 Uhr (0)
Verdammt dass ist so frustrierend,man ist so kurz vorm Ziel und kommt nicht weiter.Wenn ich doch nur müßte wie ich die Ausgelesenen Medianames des Adobe PDF Plotters in ein logisches Format bekomme.Ich versuche grad mit Reverse Engineering ranzukommen, ich versuche die "userXXX" Medianames zudrucken und gucke im Adobe welche größe dann die Seite hat :-(User134 ... kommt Fehler beim plottenUser173 ... 190,5 * 254,0mmUser32767 ... 210,0 * 297,0mm = A4User148 ... kommt Fehler beim plotten Aber das kann doch n ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AutoCAD plotten
facebraker am 24.03.2009 um 17:14 Uhr (0)
Guten Abend,ich habe es jetzt per Reverse Engineering ermittelt,ich setze dass dann in meinem VB Programm als Matrix um, ich fülle die Combobox mit dem lokalisierten Namen, eventuell noch die Maße und bevorich plotte setze ich sie in User... um.Anbei noch eine Excel-Tabelle mit der Matrix, viell. kann sie irgendwannjemand gebrauchen und muß sich nicht die Mühe machen :-)Schönen Abend noch!Gruss fb.
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : textboxinhalt speichern/legende erstellen
stolti am 22.10.2008 um 12:16 Uhr (0)
hej Carsten.das hab ich gesehen.ich hab nur die angabe mit dem kreis in meiner datei entfernt...d.h. ich find aber auch nichts damit ich da eine Umgrenzung oder ein Objekt auswählen kann...über welchen Befehl kann das geregelt werden?mfgstolti
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : textboxinhalt speichern/legende erstellen
stolti am 14.09.2008 um 17:20 Uhr (0)
hallo...ich hab mir grad mit vba ein formular erstellt...ich will legenden für pläne, an denen mehere Leute arbeiten organisieren.d.h. für wände, decken, böden layer per forumlar erstellen - d.h. ich geb in ne textbox den namen ein und daneben in eine die farbe drücke den button und der layer wird erstellt. soweit funktioniert das ganz toll...jeztt hab ich in meinem fenster/formular registerkarten erstellt für decke, boden und wand....mein ziel wäre es jetzt für jedes projekt eine datei anzulegen, die ich ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : textboxinhalt speichern/legende erstellen
stolti am 14.09.2008 um 17:41 Uhr (0)
ja. das mit der Shift-Taste tut mir leid.das Problem hab ich aber erklärt oder?an sich kurz zusammengefasst:kann man den Inhalt von Textboxen in die man was eingibt in ner Datei sichern, sodass man drauf zurückgreifen kann und den Inhalt ändern kann?bzw... wieder damit weiterarbeiten kann?stolti
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : textboxinhalt speichern/legende erstellen
Stelli1 am 14.09.2008 um 18:11 Uhr (0)
Hallo Stolti,dazu kannst du z.B. einen "Speichern" und "Laden" Button machen.Mal eine ganz einfache Variante zum speichern:Code:Datei = "C:BlaBla.TXT"open Datei for output as #1print #1, me.textbox1.textprint #1, me.textbox2.text ...close(1)und eine zum LadenCode:Datei = "C:BlaBla.TXT"open Datei for input as #1line input #1, Wertme.textbox1.text = Wertline input #1, Wertme.textbox2.text = Wert ...close(1)Mit eine Schleife die alle Controls deines Formulars durchliest wäre es wohl eleganter.Noch Eleganter w ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : textboxinhalt speichern/legende erstellen
stolti am 21.09.2008 um 17:00 Uhr (0)
sorry für die späte Antwort, bin während der Woche immer in Kopenhagen und hab da sehr wenig zeit.die Codes hab ich probiert. funktioniert.wie geht das über eine XML Datei?was ich auch schon probiert hätte - ein Feld einzubauen in dem die Farben gezeigt werden - bzw. damit ich auswählen kann (wie bei der Schraffur) und daneben soll die Farbe als Zahl stehen....aber ich find dafür keine Funktion....vielen dank für die Hilfestolti
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : textboxinhalt speichern/legende erstellen
Stelli1 am 22.09.2008 um 18:47 Uhr (0)
Hallo Stolti, Zitat:Original erstellt von stolti:was ich auch schon probiert hätte - ein Feld einzubauen in dem die Farben gezeigt werden - bzw. damit ich auswählen kann (wie bei der Schraffur) und daneben soll die Farbe als Zahl stehen....aber ich find dafür keine Funktion....Die gibt es auch nicht. Welche Farben willst du denn nehmen ?+Die Indexfarben, Truecolor, Farbbücher ...Da wäre deine Auswahlliste wohl recht lang. Verwende doch die AutoCAD Farbauswahl und füge den Farbwert (Index,RGB..) in eine Tex ...
|
| In das Form AutoCAD VBA wechseln |
