---

Hi lispler^^

Könnte mir bitte jemand verraten wie ich die Befehlszeile in meine Zwischenablage kopieren kann??
Hintergrund ist der ich will mir die Variable "area" auslesen und diese dann gleich im "Speicher" haben das ich sie wo anders einfügen kann...

Bitte um Hilfe!!

mfg chris

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Die meisten modernen Programmiersprachen  stellen meist einfache Zugriffsmöglichkeiten auf die Zwischenablage bereit,  AutoLisp leider  nicht.  Aber über  ActiveX und einem Windowsobjekt, welches die Zugriffsmethoden auf das Clipboard für sich gekapselt hat, gelingt die Nutzbarmachung für Lisp ebenfalls. Im Programm muß dafür zuerst die ActiveX-Schnittstelle mit (vl-load-com) aktiviert werden. Dann kann mit (vlax-create-object  "htmlfile") eine Instanz des Objektes, über welches auf die Zwischenablage zugegriffen werden soll erzeugt werden. Über die Unterobjekte „ParentWindow“ und „ClipBoardData“ hat man dann Zugriff auf die Methoden „Cleardata“ zum Zwischenablage leeren,“ Getdata“  zum Zwischenablage auslesen und „Setdata“ zum Daten in die Zwischenablage schreiben.

und an AREA kannst du direkt vom Objekt auslesen.

Hier war schon mal ne Dikussion zum Thema ... mit dem Verweis zur DOSLIB ..

------------------
  - Thomas -          
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

so...

hab mir den doslib jetzt rübergeladen. Hab aber noch ein kleines Ordnungsproblem. Viell. ist es grundsätzlich gut zu wissen wie die Abfragefolge bei Lisps ist. Also mein Code sieht so aus:

(defun c:flo()(command "_area" "o")(setq a (getvar "area"))(dos_clipboard a))

Problem is nur er nimmt immer die "area" vom vorherigen und nicht die vom aktuellen Befehl.

Liegt entweder daran das der Befehl noch nicht beendet ist --> neuer area wert ist noch nicht bekann.

Frage nun wie kann ich das umgehen...?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

und
(defun c:flo()(command "_area" "o" pause)(setq a (getvar "area"))(dos_clipboard a))

???

------------------
  - Thomas -          
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

-.-

^^ wenn ich dich nicht hätte cadmy

edit: DANKE

[Diese Nachricht wurde von chris888 am 15. Apr. 2011 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP