Dateiöffnung versagt

[Angelo2449]

Hallo alle,
Ich werde verrückt, eine Datei zu öffnen. Ich bekomme immer die Nachricht.
> Fehler: Art des falschen Themas: Datei nil

der Name der Datei, vollständig vom Pfad ist > d:\altprovvisori\lcfile.dat < das autolisp fa > d:\\altprovvisori\\lcfile.dat <.

wenn ich die Route direkt betrete:

(setq path "d:\\altprovvisori\\\\lcfile.dat")

alles funktioniert perfekt, wenn ich stattdessen den Weg durch die Zwischenablage der Fenster 10 ableiten :

 (setq path nil)
(Runapp "c:\\autocadsupporto\\\libertytre\\inputpregeo.exe "c:\\\\\\autocadsupporto\\\\\\\\\inputpregeo.tkn" :vlax-true)
(while (= Pfad nil)
(setq route (getcliptext))
;

(princ "\n")
(princ)
(princ route)
(princ "\n")

> d:\\\\altprovvisori\\\\\\\lcfile.dat < erscheint die obige Fehlermeldung und die Operation versagt.

Ich habe auch die Bilder vor und nach > "d:\\altprovvisori\lcfile.dat" eingegeben, aber das Ergebnis ist das gleiche.
Danke.

 

[Cristallo]

Tut mir leid, aber wo öffnen Sie die Datei?
ist der Eröffnungsanruf? Ich fand sie nicht in den lisp-Funktionen

 

[Angelo2449]

Dank Kristall Ich habe das Öffnen der Datei weggelassen:

(setq path nil)

(Runapp "c:\\autocadsupporto\\\libertytre\\inputpregeo.exe "c:\\\\\\autocadsupporto\\\\\\\\\inputpregeo.tkn" :vlax-true)

(while (= Pfad nil)
(setq route (getcliptext))
;

(princ "\n")
(princ)
(princ route)
(princ "\n")

(setq frd)

Die Ergebnisse sind:

Pfad > > > > > \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
Ursprungsort : Fehler: Art des falschen Themas: Datei nil
Danke.

 

[Cristallo]

Ich glaube, Sie berichten, dass die Dateivariable eine Art von Daten enthält, die nicht mit der vom Befehl benötigten übereinstimmen, oder dass es nil ist (nicht vorhanden)

 

[Angelo2449]

Dies sind die Ergebnisse mit den verschiedenen Optionen erhalten:
Option 1 - Einfügen des Dateinamens zum Öffnen (Pfad) direkt von der Kommandoleiste

Befehl: lcdraw

(setq Dateiname)

kompletter Pfad: d:\altprovvisori\lcfile.dat

Dateiname > > d:\altprovvisori\lcfile.dat

d:\altprovvisori\lcfile.dat

...
... Es funktioniert!!!!

Option 2 - Einfügen über externes Programm - nicht apici - einfache Umschlagleiste

Befehl: lcdraw

(Runapp "c:\\autocadsupporto\\\libertytre\\inputpregeo.exe "c:\\\\\\autocadsupporto\\\\\\\\\inputpregeo.tkn" :vlax-true)
(setq Dateiname (getcliptext))

Dateiname > > d:\altprovvisori\lcfile.dat

d:\altprovvisori\lcfile.dat

; Error: Art des falschen Themas: Datei
I

Option 3 - Einfügen über externes Programm - non apici - doppelte Umschlagleiste

Befehl: lcdraw

(Runapp "c:\\autocadsupporto\\\libertytre\\inputpregeo.exe "c:\\\\\\autocadsupporto\\\\\\\\\inputpregeo.tkn" :vlax-true)
(setq Dateiname (getcliptext))

Dateiname > > > d:\\altprovvisori\\\lcfile.dat

d:\\altprovvisori\\\lcfile.dat

; Fehler: Art des falschen Themas: Datei nil

Option 4 - Einfügen über externes Programm - mit apici - doppelte Rückseite

Befehl: lcdraw

(Runapp "c:\\autocadsupporto\\\libertytre\\inputpregeo.exe "c:\\\\\\autocadsupporto\\\\\\\\\inputpregeo.tkn" :vlax-true)
(setq Dateiname (getcliptext))

Dateiname > > > d:\\altprovvisori\\\lcfile.dat"

"d:\\altprovvisori\\\lcfile.dat"

; Fehler: Art des falschen Themas: Datei nil

Option 5 - Einfügen über externes Programm - mit apici - einfache Umschlagleiste

Befehl: lcdraw

Dateiname > > d:\altprovvisori\lcfile.dat"

"d:\altprovvisori\lcfile.dat"

; Fehler: Art des falschen Themas: Datei nil

Ich weiß nicht mehr, was ich erfinden soll!
Danke.

 

[Cristallo]

Ich glaube, dass die Schwierigkeit in der "Natur" von dem, was lcdraw produziert.
Ist das eine reine Saite?
die getcliptext-Funktion ist nicht autolisp. Hast du es geschafft? Was gibt es zurück?

 

[Angelo2449]

die getcliptext Funktion gibt den Inhalt der Fensterhinweise zurück.

 

[Angelo2449]

Ich folge der Geschichte:
die Anwendung > inputpregeo.exe < übertragen in der Windows 10 Zwischenablage den Namen der Datei, die vollständig vom Pfad geöffnet werden soll.

die Funktion > (getcliptext) < gibt den Inhalt der Windows-Notizen zurück, dann der Name der zu öffnenden Datei vollständig mit dem Pfad.

 (Defun getcliptext(/ html Ergebnis)
(setq html (vlax-create object "htmlfile"))
(setq Ergebnis (vlax-invoke (vlax-get (vlax-get html 'parentwindow) 'clipboarddata')
(vlax release object html)
Ergebnis
;

Ich verstehe nicht, warum, wenn ich den Dateinamen aus der Autocad-Befehlsleiste einfügen:

(setq Dateiname)

alles funktioniert perfekt mit dem String > d:/altprovvisori/lcfile.dat <.

Wenn ich den gleichen String aus Windows 10 Noten extrahiere, funktioniert er nicht.

 (Runapp "c:\\autocadsupporto\\\libertytre\\inputpregeo.exe "c:\\\\\\autocadsupporto\\\\\\\\\inputpregeo.tkn" :vlax-true)
(setq Dateiname (getcliptext))

Ergebnis:
und doch ist es das Gleiche, das Gleiche |
Danke.

 

[Cristallo]

versuchen, die Autolisp-String zu verarbeiten.
eine nutzlose Sache des Typs (setq stringa2 (strcat filename ""))
wenn sie sie wie eine Schnur behandelt