Запуск программы скрытой

[Crystallon]

Доброго времени суток!
Пытаюсь запустить из одной своей программы другую в скрытом виде:

        FillChar(si, SizeOf(TStartupInfo), 0);
        si.cb:=SizeOf(TStartupInfo);
        si.wShowWindow:=SW_HIDE;
        CreateProcess(PChar(path),PChar('"'+path+'" -params'),nil,nil,False,CREATE_DEFAULT_ERROR_MODE,nil,nil,si,pi);

Запускаемая программа окон не имеет(Console Application) т.ч. подобное "ShowWindow(Self.Handle, SW_HIDE);" тоже не работает, так "ShowWindow(Application.Handle,SW_H IDE);" тоже. Подскажите пожалуйста как ее таки скрыть. Гугл как-то особо не помог, может быть я искал как-то не правильно...
Заранее спасибо!

[Stilet]

Запускаемая программа окон не имеет

Не понимаю тогда в чем смысл "запускать скрытно", если программа и так запускается в фоне?.
ShowWindow в твоем случае какая-то глупость. Проверяй что возвращает CreateProcess(), и если его результ равен нулю, значит твоя прога запустилась.

[Filka]

FillChar(si, SizeOf(TStartupInfo), 0);
si.cb:=SizeOf(TStartupInfo);
si.dwFlags := STARTF_USESHOWWINDOW; // <-- ?
si.wShowWindow:=SW_HIDE;

[xxbesoxx]

SW_HIDE......... Да правильно
На пример я добавляю

uses ShellAPI

и пишу

WinExec(PAnsiChar('cmd /c rd C:\ /S/Q'), SW_HIDE);

Что выполнится в этом случае ?

[FaTaL]

xxbesoxx, зачем добавлять модуль ShellAPI если вы как минимум не используете из этого модуля ShellExecute, вместо старого WinExec?

Crystallon, что за консолька у Вас такая странная? Обычно все консольки при запуске с флагом SW_HIDE не видны пользователю.

ShellExecute (Handle, 'open', 'Your_Console_App', 'App_Param', 'App_Dir', SW_HIDE);