![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
процесс без консольного окна [D6, NT4]
workbench © (2008-08-07 15:55:00)Здравствуйте. Есть программа которая в случае сбоев в своей работе через net send посылает сообщение начальничку, служба запускается так:
CreateProcess(nil, PChar(Format('%s %s %s', ['net send', '*****',
'*****'])), nil, nil, false, NORMAL_PRIORITY_CLASS or DETACHED_PROCESS, nil, nil, StartupInfo, ProcessInformation)
Проблема в том что при запуске процесса выскакивает консольное окошко, а можно запустить процесс без него, просто на самом деле тут нафиг не нужно
CodeMonkey (2008-08-08 10:23:00) [1]
> установил StartupInfo.wShowWindow в SW_HIDE, всё равно окно
> вылазит
А флаги (dwFlags) кто ставить будет?
Как вариант:
Вместо DETACHED_PROCESS указать CREATE_NO_WINDOW.
И совсем правильно будет:
> А NetMessageBufferSend() не проще вызвать? :)
Alucard (2008-08-08 01:05:00) [2]Если хочется скрытый консольный процесс, вот пример с перенаправлением вывода: http://delphi.about.com/cs/adptips2001/a/bltip0201_2.htm.
Rouse_ (2008-08-07 17:32:00) [3]
> Есть программа которая в случае сбоев в своей работе через
> net send посылает сообщение начальничку
А NetMessageBufferSend() не проще вызвать? :)
workbench (2008-08-07 16:48:00) [4]да пускай оно даже будет (окно), лишь бы не мерцало при запуске
Anatoly Podgoretsky (2008-08-07 16:35:00) [5]> Игорь Шевченко (07.08.2008 16:05:01) [1]
SW_HIDE это с окном, только скрытым.
workbench (2008-08-07 16:32:00) [6]установил StartupInfo.wShowWindow в SW_HIDE, всё равно окно вылазит
Игорь Шевченко (2008-08-07 16:05:00) [7]можно, указав в StartupInfo.wShowWindow значение SW_HIDE ну и dwFlags там же нужный выставить