Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > MS Windows > Как спрятать прложение, сделать сервисом?

Автор: postovik 13.2.2006, 01:21

После запуска приложение висит в свернутом или в обычном виде в виде досовского окна в win xp . Неудобно - занимает место в панели задач, иногда случайно закрываю. Как сделать так чтобы после запуска окно исчезало (именно исчезало а не сворачивалось) , т.е. чтобы был виден только процес в диспетчере задач, я так понимаю нужно сделать как-то его сервисом...

Автор: termik 13.2.2006, 05:03

Srvinstw
вот прога делаюшая из прог, сервисы, все интуитивно понятно..

Если в поиске не найдешь... то могу на мыло выслать

Автор: Garik 13.2.2006, 10:58

Все делается проще и без дополнительных программ встроенным средством Windows - WSH. Создать файл:

Код


//=====runhide.js=========
var WSHShell = WScript.CreateObject("WScript.Shell");
WSHShell.Run("notepad",0);
//=====end=runhide.js=====

Вместо notepad - полный путь к программе. В пути слеши должны быть двойными: "C:\\Folder\\file.exe".
Второй параметр в строке WSHShell.Run("notepad",0); указывает, что запускать надо в скрытом виде - без кнопки на панели задач, окно не видимо, приложение светится только в процессах.

Автор: postovik 13.2.2006, 12:41

Garik, спасибо большое!
А можно ли сделать чтобы еще проверялось запущен ли процес - если запущен закрыть , а если нет - открыть с помощью кода выше. Т.е. с помощью ярлыка можно будет закрывать или открывать приложение.

Автор: Garik 13.2.2006, 12:54

Пример на VBScript (расширение файла должно быть .vbs)

Код


Dim WSh
Set WSh = WScript.CreateObject("WScript.Shell")
On Error Resume Next
 
   For Each Process in GetObject("winmgmts:"). _
   ExecQuery ("select * from Win32_Process where name='iexplorer.exe'")
      Process.terminate(0)
   Next
Set WSh = nothing