Delphi (Spuštěni jine aplikace v hide režim) – Delphi – Fórum – Programujte.com

Zdravím a prosím o radu.

Tady je VBS spript

http://gallery.technet.microsoft.com/ScriptCenter/en-us/8bbed56f-a7aa-491f-a296-687dd96098a3

var WindowStyle_Hidden = 0
var objShell = WScript.CreateObject("WScript.Shell")
var result = objShell.Run("notepad.exe", WindowStyle_Hidden)

http://forum.codecall.net/c-c/5361-need-help-writing-program-hide-cmd-windows.html

Úplně stejně, najdeš funkci, která umožňuje určit stav okna vytvořeného procesu.
Třeba v odkazech zmíněnou ShellExecute

ShellExecute(Application.MainForm.Handle, nil, 'program.exe', nil, nil, SW_HIDE);

WinExec('program.exe', SW_HIDE);

Funguje, ale nějak nemohu upravit tu cestu k souboru.
Jde mi o toto.
Na flashdisku v kořenovem adresaři bude tento program jako spouštěč.
Chci aby mi spustil program třeba xxx.exe v adresaři "program" na tom samem flashdisku.
Zkoušel jsem to pomoci ExtractFilePath(application.ExeName) ale nějak to nefunguje.

Tak to zkus takto:
ExtractFileDir(Application.ExeName)+'\program\xxx.exe'