[LISP] - Avvio applicazione esterna

[Emiliano - EmiCAD]

Ciao,
devo avviare un'applicazione esterna (estensione *.exe) con AutoCAD mediante
LISP (No Visual LISP).
Ho scritto il seguente codice

(command "_shell" "nomeapplicazione.exe")

Funziona ma appare una fastidiosa schermata DOS che rimane attiva fino a
quando non chiudo l'applicazione aperta.
E' possibile rimediare a questo problema?

Ringrazio tutti in anticipo.

[SePrAm.com]

Io utilizzo:
(startapp "nomeapplicazione")
Ciao Claudio
--
--

Post by Emiliano - EmiCAD
Ciao,
devo avviare un'applicazione esterna (estensione *.exe) con AutoCAD mediante
LISP (No Visual LISP).
Ho scritto il seguente codice
(command "_shell" "nomeapplicazione.exe")
Funziona ma appare una fastidiosa schermata DOS che rimane attiva fino a
quando non chiudo l'applicazione aperta.
E' possibile rimediare a questo problema?
Ringrazio tutti in anticipo.
--
Emiliano - Webmaster di EmiCAD® - Tutto per AutoCAD e ProgeSOFT® ProgeCAD
web: www.emicad.it

[aaaa]

Confermo : per gli interessati funziona anche in progecad.

oppure per aprire direttamente un file NON exe si può usare

(command "_url" "c:/pippo.txt")

Post by SePrAm.com
(startapp "nomeapplicazione")
Ciao Claudio
--
--

Post by Emiliano - EmiCAD
Ciao,
devo avviare un'applicazione esterna (estensione *.exe) con AutoCAD

mediante

Post by Emiliano - EmiCAD
LISP (No Visual LISP).
Ho scritto il seguente codice
(command "_shell" "nomeapplicazione.exe")
Funziona ma appare una fastidiosa schermata DOS che rimane attiva fino a
quando non chiudo l'applicazione aperta.
E' possibile rimediare a questo problema?
Ringrazio tutti in anticipo.
--
Emiliano - Webmaster di EmiCAD® - Tutto per AutoCAD e ProgeSOFT® ProgeCAD
web: www.emicad.it

[Emiliano - EmiCAD]

Post by SePrAm.com
(startapp "nomeapplicazione")
Ciao Claudio

Ok!!
Semplice ed efficace.

Grazie.
... anche agli altri ovviamente!

[Marco_AA]

Post by Emiliano - EmiCAD
devo avviare un'applicazione esterna (estensione *.exe) con AutoCAD mediante
LISP (No Visual LISP).

Puoi usare DOS_EXEWAIT di DOSLib: http://www.mcneel.com

oppure dai un'occhiata agli esempi seguenti.

Ciao.

; Marc'Antonio Alessi, Italy - http://xoomer.virgilio.it/alessi
;
; Function: MsW_StartAppWithFile
;
; Example:
; (MsW_StartAppWithFile
; "Excel.exe"
; "C:\\Temp\\Test Files\\MyXls File.xls"
; )
;
(defun MsW_StartAppWithFile (AppNam FilNam / AppPat FilPat)
(cond
( (and
(setq FilPat (findfile FilNam))
(setq AppPat (MsW_GetAppPath AppNam))
)
(startapp
(strcat AppPat AppNam)
(strcat "\"" FilPat "\""); i doppi apici servono nel caso di FilPat
); con spazi affinchè non venga interpretata come insieme di stringhe
)
( (null FilPat)
(alert (strcat "File: \"" FilNam "\" non trovato."))
)
( (null AppPat)
(alert (strcat AppNam " non è una applicazione Microsoft Windows
registrata."))
)
)
)
;
; Get Microsoft Windows applications path
; Example: (MsW_GetAppPath "Excel.exe")
;
(defun MsW_GetAppPath (AppNam)
(vl-registry-read
(strcat
"HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\App
Paths\\"
AppNam
)
"Path"
)
)
;
; Get Microsoft Excel path
;
(defun MsX_GetPath ( ) (MsW_GetAppPath "Excel.exe"))
;
--
----------------------------------------------------------
Marc'Antonio Alessi - http://xoomer.virgilio.it/alessi

Per AutoCAD:

- Travi 2D: disegno automatico travi e pilastri in C.A.,
relativi ferri e staffe, report peso ferri e C.A.
su Excel
- Calcolo automatico aree su planimetrie: report su Excel
per locale altezza, piano con descrizioni locali e piani
- Elaborazione dati from/to Excel
- Librerie manufatti in assonometria
- Autolayers: gestione automatica dei layers
- Elaborazioni e stampe multiple e automatiche
- Parametrico 2D, Viterie 2D/3D, Esplosi 2D/3D
- AutoGroups: gestione automatica gruppi di layers
- SetUp del disegno con gestione automatica DimStyles
- Conversione automatica files Inventor a DWG e viceversa
anche senza avere Inventor installato
- ...
----------------------------------------------------------