---

Wie arbeitet eigentlich Autolisp intern?
Datei öffnen-auslesen in Puffer -Datei schließen - PufferInhalt abarbeiten ? oder
öffnen- abarbeiten- schließen?

Sieht so aus, als ob letzters der Fall ist, denn scheinbar kann sich eine Lsp-Datei nicht selberlöschen!? Oder ist es ein Timing-Problem?

Zum Test: mal folgendes unter "D:\\a.lsp" abspeichern und laden.
(if(findfile "D:\\a.lsp")(princ "\nGefunden")(princ "\nNicht Gefunden"))
(if(vl-file-delete "D:\\a.lsp")(princ "\nGelöscht")(princ "\nNicht Gelöscht"))

Hat jemand dazu evtl. etwas Hintergrundwissen, bzw. wie kann ich eine Datei dazubringen, sich selbst zu löschen?

------------------
- Thomas -

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

---

hab probeweise mal eine test.lsp auf c: erstellt

Code:

---

(defun c:del_me ()
(command "shell" "del c:\\test.lsp")
)

---

hat sich damit einfach löschen lassen - selbst wenn sie im Visual-Lisp-Editor noch geöffnet ist!....

------------------
mfg Siegfried Schachinger
http://www.tbschatz.at

[Diese Nachricht wurde von Schachinger am 26. Aug. 2004 editiert.]

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

---

sorry ich nochmal 

selbst wenn ich

Code:

---

(princ "test.lsp geladen!")
(command "shell" "del c:\\test.lsp")
(princ "test.lsp gelöscht!")

---

reintippe funktionerts.
beide texte werden angezeigt und die datei ist auch gelöscht..

------------------
mfg Siegfried Schachinger
http://www.tbschatz.at

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

---

über shell Ist erst mal ein Workaround! Danke!

Aber vl-filedelete macht wohl noch was anderes??
Weitere Antworten willkommen! (zwecks Basiswissenserweiterung)

------------------
- Thomas -

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

---

Korrektur... mit shell funzt nur, weil der shell befehl zu lahm ist!!!!

zu testen ( wieder in datei speichern, NAME anpassen, laden):

(setq NAME "D:\\a.lsp")
(princ "\nDAVOR")
(if(findfile NAME)(princ "\nGefunden")(princ "\nNicht Gefunden"))
(command "shell" (strcat "del " NAME))
(repeat 1000000 (1+ 1))         
(if(not(findfile NAME))(princ "\nGelöscht")(princ "\nNicht Gelöscht"))
(princ "\nDANACH")

------------------
- Thomas -

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

---

Hi CADmi altes Sommerloch :-),
versuch mal dieses hier:

Code:

---

(if(setq xx (findfile "a.lsp"))(princ "\nGefunden")(princ "\nNicht Gefunden"))
(defun SELF-DELETE (REACTOR PARAMETERLIST /)
  (if (vl-file-delete xx)
    (princ "\nGelöscht")
    (princ "\nNicht Gelöscht")
  ) ;_ end of if
  (vlr-remove reactor)
  (princ)
) ;_ end of defun
(vlr-lisp-reactor nil '((:vlr-lispEnded . SELF-DELETE)))

---

..

------------------
Ciao,
Marc

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

---

Hab's jetzt nicht so genau gelesen, aber ich vermute, dass das Problem bei findfile liegt. Achim Dabrunz hat mir mal erzählt, dass er da schier verzweifelt ist, weil das einen 'internen cache' oder so etwas hat. Jedenfalls findet es immer mal Dateien, die schon eine Viertelstunde vor her gelöscht wurden - und dann geht's natürlich voll in die Hose:-(

Grundsätzlich gibt's das Problem in jeder Programmiersprache, aber da man in AutoLisp nirgendwo ein 'Flush' abstezen kann, ist man hier verschärft betroffen.

Gruß, Axel-Strube-Zettler

------------------

Meine AutoLisp-Seiten
Meine private Homepage
Mein Angriff auf dein Zwerchfell
Mein Lexikon der Fotografie
Mein gereimtes Gesülze

[Diese Nachricht wurde von mapcar am 26. Aug. 2004 editiert.]

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

---

@MARC : schöner Ansatz!!!! (Leider läßt sich der in mein Proggi ->autoupdate von der acad.lsp gestartet und acad.lsp mitbetroffen - nur sehr unelegant implementieren... da kann ich auch 2stufig fahren, acad.lsp und acaddoc.lsp)
@Axel : findfile ist bei dem Prob eigentlich nur ein Nebeneffekt, dass es dabei auch Probleme gibt... nicht schön.. 

------------------
- Thomas -

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

---

Hai Marc
das ist eigentlich eine Prima Lösung - und dieses Findfile kann mann ja auch anders umgehen
Danke Dir

------------------
Gruß
CADwiesel
Besucht uns im CHAT

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