| Вопрос: СРОЧНО! ПОМОГИТЕ! | Добавлено: 24.04.08 17:25 |
Автор вопроса:  werber | Web-сайт: www.werbersoft.ru
|
|
Дорогие вбнетникик! ПОМОГИТЕ! До завтра нужен пример, который выключает себя сам. НО: это должно происходить "убийством" своего процесса. Именно так! Может у кого есть модуль? Помогите ради Бога! ОЧЕНЬ НУЖНО!
Например: при нажатии на кнопку cmdExit происходит убийство своего процесса. Я надеюсь на Вас!!! |
| Ответы | Всего ответов: 11 |
|
Номер ответа: 1 Автор ответа:  User Unknown Вечный Юзер! ICQ: uu@jabber.cz Вопросов: 120 Ответов: 3302 |
Профиль | | #1 | Добавлено: 24.04.08 17:26 |
|
End или Exit Sub
Не подойдёт? |
||
|
Номер ответа: 2 Автор ответа:  werber Вопросов: 71 Ответов: 112 |
Web-сайт: Профиль | | #2 | Добавлено: 24.04.08 17:28 |
|
Нет, только через ExitProcess (или типа того).
Сам я в этих АПИ не шарю, поэтому ПОМОГИТЕЕЕЕ!!!! |
||
|
Номер ответа: 3 Автор ответа: werberВопросов: 71 Ответов: 112 |
Web-сайт: Профиль | | #3 | Добавлено: 24.04.08 17:29 |
| Ни End, ни Unload не предлогать! Нужно через API! | ||
|
Номер ответа: 4 Автор ответа: werberВопросов: 71 Ответов: 112 |
Web-сайт: Профиль | | #4 | Добавлено: 24.04.08 17:31 |
| Как я понимаю надо найти Hwnd своего окна, а потом вызвать ExitProcess, но я не шарю, как это сделать! Поэтому лучше выложить в модуле исходник. | ||
|
Номер ответа: 5 Автор ответа: МП41А Вопросов: 0 Ответов: 13 |
Профиль | | #5 | Добавлено: 24.04.08 18:03 |
|
Вот так пойдет?
Private Declare Function TerminateProcess Lib "kernel32" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long
Private Declare Function GetCurrentProcess Lib "kernel32" () As Long Private Sub Command1_Click() Call TerminateProcess(GetCurrentProcess, 0) End Sub |
||
|
Номер ответа: 6 Автор ответа: J. SmithICQ: ненавижу Вопросов: 40 Ответов: 477 |
Web-сайт: Профиль | | #6 | Добавлено: 24.04.08 19:59 |
| +1 | ||
|
Номер ответа: 7 Автор ответа: s12Вопросов: 24 Ответов: 363 |
Профиль | | #7 | Добавлено: 25.04.08 00:24 |
|
Зачем все так усложнять?
Убивает процесс из которого вызвано намертво: Private Declare Function ExitProcess Lib "kernel32.dll" (ByVal uExitCode As Long) As Long
Private Sub Command1_Click() ExitProcess 0 End Sub ЗЫ: Ув. werber, найдите себе нормальный справочник по API, от себя рекомендую: Microsoft® Win32® Programmer's Reference, заточен под С, но ИМХО очень хороший. |
||
|
Номер ответа: 8 Автор ответа: s12Вопросов: 24 Ответов: 363 |
Профиль | | #8 | Добавлено: 25.04.08 00:51 |
|
ЗЗЫ:
Как я понимаю надо найти Hwnd своего окна, а потом вызвать ExitProcess, но я не шарю, как это сделать! Поэтому лучше выложить в модуле исходник.
Мда... с Win32 Programmer's Reference это я погорячился. Поищи справочник здесь: http://rusproject.narod.ru/ Очень неполный справочник, но для начинающего самое то 
|
||
|
Номер ответа: 9 Автор ответа:  Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949 |
Web-сайт: Профиль | | #9 | Добавлено: 25.04.08 01:31 |
| И у МП41А и у s12 код правильный и рабочий, только не злоупотребляй им в среде VB IDE, ибо, естественно, ты будешь убивать ее процесс. Тести на скомпилированном файле. | ||
|
Номер ответа: 10 Автор ответа: werberВопросов: 71 Ответов: 112 |
Web-сайт: Профиль | | #10 | Добавлено: 25.04.08 07:59 |
|
СПАСИБО! И s12, И МП41А И Executioner
! ПОМОГЛИ, И ГЛАВНОЕ ТАК БЫСТРО! СПАСИБО, ВАМ РЕБЯТА! ОГРОМНОЕ СПАСИБО! |
||
|
Номер ответа: 11 Автор ответа: AgentFireICQ: 192496851 Вопросов: 75 Ответов: 3178 |
Профиль | | #11 | Добавлено: 25.04.08 14:20 |
|
Ах, я аж расчувствовался
|
||
Страница: 1 |