|
Lisp : Lisp aus Delphi starten
neurosis am 16.05.2008 um 02:32 Uhr (0)
hier noch eine seite mit beispielen fuer delphi / autocad activex: http://www.caddzone.com/delphi/samples.htm ------------------Marco Heuer www.arc-aachen.de Airport Office[Diese Nachricht wurde von neurosis am 16. Mai. 2008 editiert.][Diese Nachricht wurde von neurosis am 16. Mai. 2008 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Lisp aus Delphi starten
neurosis am 19.05.2008 um 11:44 Uhr (0)
ich selber verwende delphi nur fuer die konfiguration meiner programme in autocad nach der installation (aufruf einer lisp-datei, um supportpfade zu setzen und menues/toolbars dynamisch zu erzeugen).ueber die entsprechenden tlb-dateien werden die unterschiedlichen produktzyklen von autocad (2000-2002, 2004-2006, 2007-2008) angesprochen. innerhalb eines zyklus kommt es drauf an, welche version zuletzt gestartet wurde (d.h. wenn kein autocad offen ist, wird das zuletzt gestartete vom entsprechenden zyklus ve ...
|
| In das Form Lisp wechseln |
|
Lisp : Auslesen einer AutoCAD-Datei
easwarananthan am 16.05.2008 um 13:28 Uhr (0)
Herzlichen Dank für eure hilfreichen Post!VG[Diese Nachricht wurde von easwarananthan am 16. Mai. 2008 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Lisp aus Delphi starten
HPW am 19.05.2008 um 09:49 Uhr (0)
Hallo,Interessante Funktion!Dazu eine Frage: Was ist wenn es mehrere Autocad-Sitzungen gibt?Welche wird genommen? Eindeutigkeit?Ich habe in der Vergangenheit dann über die WIN-API mit dem eindeutigen Fenster-Titel-String mir das Fenster-Handle geholt und per Sendkeys den Lisp-Callback gestartet.(Fenster-Titel wurde beim Delphi-Start als Kommando-Zeilenparameter übergeben).------------------Hans-Peter
|
| In das Form Lisp wechseln |
|
Lisp : Lisp aus Delphi starten
neurosis am 15.05.2008 um 15:44 Uhr (0)
da hab ich doch wirklich eine konstantendeklaration uebersehenAcadApp = AutoCAD.Application.15; fuer 2000-2002AcadApp = AutoCAD.Application.16; fuer 2004-2006AcadApp = AutoCAD.Application.17; fuer 2007-2008------------------Marco Heuerwww.arc-aachen.deAirport Office
|
| In das Form Lisp wechseln |
|
Lisp : Lisp aus Delphi starten
mundal am 15.05.2008 um 13:00 Uhr (0)
Klasse + Danke @Marco, das war genau das was ich benötigte.Jetzt komme ich bestimmt gut voran.!!! Nochmals 1000 x Danke !!!!Ich hatte in der Programmzeile acad:= GetActiveOleObject(AcadApp);das AcadApp in Acad umgewandelt dann lief das Programm.Ist das dann soweit ok ?Falls Du weitere Beispielprogramme von Delphi und AutoCAD hastdann wäre ich ein dankbarer Abnehmer.Viele GrüßeJoachim
|
| In das Form Lisp wechseln |
|
Lisp : Lisp aus Delphi starten
mundal am 13.05.2008 um 14:25 Uhr (0)
Hallo Holger,Danke für Deine prompte Hilfe.Kannst Du mir eine Beispieldatei senden?Ich sollte ein kleines Delphiprogramm haben das sich problemloscompilieren und starten lässt.Das Programm soll nur AutoCAD starten, eine Zeichnung laden und in diese Zeichnung einen Kreis mit beliebeigem Radius an beliebigem Punkt zeichnet.Den Rest bekomme ich dann bestimmt alleine gebacken.GrussJoachim
|
| In das Form Lisp wechseln |
|
Lisp : hyperlink länge
hometuruk am 20.05.2008 um 11:32 Uhr (0)
Ich habe mir mir strcat folgende (hyp-) Variable erstellt.diese hänge ich an ein Zeichnobjekt: http://srvapp49.bogi.xxxxxxxxx.de/d.web/xxxxxxxxx/index?goto=search&search=result2&find=find&doc_type_short=ZEICH&doc_field_array_63=50000242 Den hyperlink übernimmt Autocad aber nur bis : http://srvapp49.bogi.xxxxxxxxx.de/d.web/xxxxxxxxx/index?goto=search&search=result2&find=find&doc_type_short=ZEICH&doc_field_array_63 gibt es da eine Beschränkung. Wenn ich den Hyperlink manuell erweitere mit =50000242 dann funk ...
|
| In das Form Lisp wechseln |
|
Lisp : hyperlink länge
hometuruk am 20.05.2008 um 12:37 Uhr (0)
Aber händisch das fehlende String dazutippen funzt-- komisch!AC2007...und übernimmt er den url-base dann auch in die "dwf-Datei"?Wir arbeiten mit "eplot classic", da dort mit whip4! auch noch nach Texten mittels des Apis gesucht werden können. In dwf6 funktioniert dies meines wissens nicht mehr (ist aber ein anderes Thema).Aber danke für die HilfeGruesse
|
| In das Form Lisp wechseln |
|
Lisp : hyperlink länge
hometuruk am 20.05.2008 um 14:16 Uhr (0)
;wenn das weiterhilft und Danke für die Mühe (defun c:eqp-BTV() (princ)(setq Dateiname (getstring "Datei von Koordinatliste eingeben (z.B. kliste.txt): ")) (if (= Dateiname "")(setq Dateiname "pumpen.csv")(setq Dateiname "pumpen.csv")) ;stringdatei;suche Pumpen(setq aus (ssget "x" ((0 . "TEXT") (1 . "J-*")))) ;suche nach text mit "J-*"(setq l (sslength aus))(setq l1 0)(while ( l1 l) (setq temp1 (ssname aus l1)) (setq all1 (entget temp1) val1 (cdr (assoc 1 all1)) );endsetq(setq l1 (+ l1 1)) (princ "Zähl ...
|
| In das Form Lisp wechseln |
|
Lisp : hyperlink länge
fuchsi am 20.05.2008 um 17:09 Uhr (0)
einige AnmerkungenCode:(setq Dateiname (getstring "Datei von Koordinatliste eingeben (z.B. kliste.txt): "))(if (= Dateiname "") (setq Dateiname "pumpen.csv") (setq Dateiname "pumpen.csv"))Hm. komischer Konstrukt. Für was soll denn der User einen Dateinamen eingeben, wennst ihn sowieso mit pumpen.csv überschreibst ?Code:(setq STR (car Listenzeile))(setq EQ (car (cdr Listenzeile)))STR und EQ sind Symbolnamen und DÜRFEN nicht als Variablennamen verwendet werden !------------------ Ing. Anton FuchsWWW.FFZEL ...
|
| In das Form Lisp wechseln |
|
Lisp : Problem mit is_cancel = true
Niggemann am 23.05.2008 um 15:33 Uhr (0)
Hallo Jörn,ich benutze nicht die Standart Button, sondern immer nur die von mir angelegten Button, für OK oder Abbruch. In meiner DCL Datei steht immer "Weiter" für "OK" und "Exit" für "Abbruch" bzw. "cancel". Mehrfach kann "is_cancel" nicht vor kommen, da ich die Einstellung für Überprüfung der DCL Datei auf:dcl_settings : default_dcl_settings { audit_level = 3; } stehen habe. Dadurchkommt ein Meker wenn ich ein 2. "is_cancel" drinn hätte.Beim ausprobieren habe ich dann festgestellt, wenn ich den Button " ...
|
| In das Form Lisp wechseln |
|
Lisp : Problem mit is_cancel = true
Niggemann am 21.05.2008 um 16:47 Uhr (0)
Hallo Forum,habe folgendes Problem:In einem DCL Fenster möchte ich die Felder mit unterschiedlichen Werten füllen,einmal mit den Werten der Liste A, einmal mit den Werten der Liste B. Dieses klappt auch einwandfrei. Mein lisp hat ein Button "Weiter" und ein Button "Exit".(action_tile "WEITER" "(if (= POS_STUECK 1)(POS_STUECKLISTE 0)(POS_ENDE))")(action_tile "EXIT" "(if (= POS_STUECK 1)(POS_STUECKLISTE 0)(done_dialog 0))")Mit "Weiter" kann ich Problemlos wieder zurück schalten und die vorherigen Werte wied ...
|
| In das Form Lisp wechseln |