Как процесс сделать скрытым -> Форум на Исходниках.Ру

	Наши проекты: Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту

Здравствуйте, Гость ! [18.216.38.221]

Дорогие друзья! Поздравляем вас с днём Победы!

Правила раздела Visual Basic: Общие вопросы

Здесь обсуждаются вопросы по языку Visual Basic 1-6 (а так же по схожим языкам, как, например, PowerBASIC).
Вопросы по Visual Basic .NET (это который входит в состав Visual Studio 2002/2003/2005/2008+, для тех, кто не в курсе) обсуждаются в разделе .NET.

Обратите внимание:
1. Прежде чем начать новую тему или отправить сообщение, убедитесь, что Вы не нарушаете правил форума!
2. Обязательно воспользуйтесь поиском. Возможно, Ваш вопрос уже обсуждали. Полезные ссылки приведены ниже.
3. Темы с просьбой выполнить какую-либо работу за автора в этом разделе не обсуждаются. Студенты, вам сюда: ПОМОЩЬ СТУДЕНТАМ!
4. Используйте теги [ code=vba ] ...текст программы... [ /code ] для выделения текста программы подсветкой.
5. Помните, здесь телепатов нет. Формулируйте свой вопрос максимально грамотно и чётко: Как правильно задавать вопросы
6. Запрещено отвечать в темы месячной (и более) давности, без веских на то причин.

Полезные ссылки:
user posted image

FAQ Сайта

FAQ Раздела user posted image

Кладовка

Наши Исходники user posted image

API-Guide

Поиск по Разделу user posted image

MSDN Library Online user posted image

Google

Ваше мнение о модераторах: user posted image

SCINER,

B.V.

Модераторы: SCINER, B.V.

Новое голосование

Как процесс сделать скрытым!!!

MYSTIQUE	Сообщ. #1 , 09.01.02, 23:05
Unregistered	Как сделать чтобы прога не виделась при нажатии Ctrl-Alt-Del !

BootMaster	Сообщ. #2 , 10.01.02, 07:28
Unregistered	Есть такая функция, RegisterServiceProcess, она делает твой процесс сервисным и скрывает из Ctrl-Alt-Del.Подробнее смотри MSDN.

AlexR	Сообщ. #3 , 10.01.02, 07:38
Unregistered	Посмотри в теме "Невидимая программа" (19.11.2001).

aker13	Сообщ. #4 , 10.01.02, 07:58
Unregistered	doljna bit gotovaya proga na site www.vbcode.com ya tak, dummayu!!!!

aker13

Сообщ. #5 , 10.01.02, 09:19

Unregistered

laaaadno, jivi!!!!
'declaraciya
Public Declare Function GetCurrentProcessId Lib "kernel32" () As Long
Public Declare Function GetCurrentProcess Lib "kernel32" () As Long
Public Declare Function RegisterServiceProcess Lib "kernel32" (ByVal dwProcessID As Long, ByVal dwType As Long) As Long
Public Const RSP_SIMPLE_SERVICE = 1
Public Const RSP_UNREGISTER_SERVICE = 0

'i code, chtobi ubrat vizovi MakeMeService proceduru:
Public Sub RemoveProgramFromList()
Dim lngProcessID As Long
Dim lngReturn As Long

lngProcessID = GetCurrentProcessId()
lngReturn = RegisterServiceProcess(pid, RSP_SIMPLE_SERVICE)
End Sub

'a chtobi vostanovit vizovi UnMakeMeService proceduru:
Public Sub AddProgramToList()
Dim lngProcessID As Long
Dim lngReturn As Long

lngProcessID = GetCurrentProcessId()
lngReturn = RegisterServiceProcess(pid, RSP_UNREGISTER_SERVICE)
End Sub

aker13	Сообщ. #6 , 10.01.02, 09:49
Unregistered	'''ili je Private Sub Form_Load() App.TaskVisible = False End Sub

AlexR	Сообщ. #7 , 10.01.02, 09:50
Unregistered	App.TaskVisible = False у меня не всегда работает.

aker13	Сообщ. #8 , 10.01.02, 10:36
Unregistered	u menya toje, tolko ti vsem ne govori

0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)

0 пользователей:

[ Script execution time: 0,0223 ] [ 16 queries used ] [ Generated: 11.05.24, 05:18 GMT ]