Importieren Sie alle Bilder eines Ordners

[Papao]

Guten Morgen.
Ich möchte einen lisp-Befehl erstellen, der alle Bilder, die einen bestimmten Ordner enthält, enthält.
Ich habe im Netzwerk etwas gefunden, das meinem Fall entspricht, aber einige Verbesserungen braucht, die ich nicht tun kann.

Ich möchte daher hinzufügen, den Wert von zwei Blockattributen im aktuellen Design zu lesen, um zu definieren, auf welchem Ordner die Bilder zu importieren (der Pfad des Ordners wird gleich sein wie ich Echo aus der Summe der Messwerte der beiden Blockattribute und muss anstelle von "c:/tmp") sein.
Ich möchte auch mit einem Klick auf den Ort definieren, wo ich jedes Bild einfügen möchte.
unten, der Code, den ich gefunden habe. Danke.

(setq loc "c:/tmp)
(sing)
Erzeugnis
(vl-directory-files loc "*.jpg" 1)
(Befehl)
"._image"
♪
(Strcat loc "/" item)
(Liste 0,0)
1,0
0,03
)
)

 

[GP.]

die Bilder einzeln ersetzen (Liste 0.0 0.0 0.0) mit Pause.
für Attribute müssen wir uns vorstellen, ob Sie sie einzeln oder einen Block auswählen müssen, der sie beide enthält?
einen Dwg anbringen?

 

[Papao]

Danke 1000 für die Antwort!
gut für Pause: es funktioniert perfekt!

Attribute sind im Block des Knorpels enthalten usw..
die Etiketten, die die zu hinterfragenden Werte enthalten, werden genannt _commessa e) Design-nder Block und seine Etiketten haben immer den gleichen Namen in jedem Design.

 

[Cristallo]

Guten Morgen.
Ich möchte einen lisp-Befehl erstellen, der alle Bilder, die einen bestimmten Ordner enthält, enthält.

Tut mir leid, aber würden Sie es aus absolut nichts schaffen?
Ich werde es erklären. Ich möchte auch eine Aktivität schaffen, die etwa 2500 Euro pro Monat produziert.
Ich fand meine iban (its020085689700000035421032)
Ich fragte mich, ob 2000 von diesen 2500 Sie hätte...

 

[Papao]

Tut mir leid, aber würden Sie es aus absolut nichts schaffen?
Ich werde es erklären. Ich möchte auch eine Aktivität schaffen, die etwa 2500 Euro pro Monat produziert.
Ich fand meine iban (its020085689700000035421032)
Ich fragte mich, ob 2000 von diesen 2500 Sie hätte...

Was ist los mit dir?
Wenn Sie mir nicht helfen wollen, antworten Sie nicht... Dankbar sind sie nicht alle wie you .

 

[Cristallo]

Aber ich möchte Ihnen helfen... versuchen, in diesem Forum zu sterben.
entwickelt (selbstverständlich bezahlen) Softwarelösungen.
ein Konto verpflichtet sich, etwas zu produzieren, von Forum-Freunden geholfen.
eine andere ist, ein Programm für ihre eigenen Bedürfnisse zu machen, scrocco.
Auf der anderen Seite sagtest du... Du willst erstellen.
Sie haben es (eine andere vampirata auf dem Netz, aber Sie können bleiben), setzen Sie sich mit einem schönen lisp-Handbuch und wo Sie es schwer zu sehen, wie Sie helfen. .

Aber denken Sie an Sie... Er ist nur...

 

[Papao]

Dank gp. mit Ihrer Hilfe gelang ich in meiner Absicht, das zu vervollständigen, was ich brauchte;
Ich fügte die dwgprefix-Variable hinzu, um zurück auf den Dateirettungspfad zu verfolgen.
p.s.: nicht durch die Arroganzen der Menschen eingeschüchtert werden, sondern immer selbst sein!

x die Administratoren/Mitglieder des Forums:
für mich können wir diese "triste" Diskussion schließen

 

[Cristallo]

Gut.
und ich sehe, dass in der Perspektive des Teilens und des Übersehens helfen Sie auch Ihre Liste veröffentlicht, wenn es jemand anderen dienen sollte. Ehren Sie.

 

[Papao]

wie von der Regulierung und dem Geist des Teilens, ich bin die komplette Liste.
Ich danke nochmals für die Hilfe der Freunde des Forums, die mir erlaubte, das gewünschte Ergebnis zu erzielen.