Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.57/7: Рейтинг темы: голосов - 7, средняя оценка - 4.57
Storm
1

Запущено ли другое приложение ?

12.09.2007, 10:17. Показов 1347. Ответов 3
Метки нет (Все метки)

Как программно узнать запущено ли приложение tratata.exe ?

Может ссылочку кинете какю-нибудь.
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.09.2007, 10:17
Ответы с готовыми решениями:

Как проверить, запущено приложение или нет?
Народ! Как проверить, запущено приложение или нет? Заранее спасибо.

Открыть кнопкой другое приложение
Как можно открыть нажатием кнопки другое VB приложение из первого. Есть кнопки ,, МАГАЗИН,, ,,...

Не могу запустить из VB другое приложение
Например, хочу сделать Autorun немогу сделать так чтобы открылось другое приложение. B Basic было...

как контролировать другое приложение
у меня такой вопрос: как можно следить за открытием\закрытием другой программы, не относящейся к...

3
YURA
12.09.2007, 11:23 2
Tool Help Functions
Win32 Programmers's Reference
<Process32First>
0 / 0 / 1
Регистрация: 16.08.2007
Сообщений: 271
12.09.2007, 13:37 3
Получи список всех процессов, найди тот который тебе нужен в списке и закрой его или просто узнай есть ли он среди запущкнных... все это покажется сдесь в ListBoxe
--------------------------------------------------
Вставь в форму вот это.
Добавь на форму cmdClose - кнопку и lstList - ЛистБокс.
Теперь ты не только видишь все приложения и их окна но и можешь их закрывать - осторожнее - не все закрываються корректно

Private Declare Function FindWindow Lib 'user32' Alias 'FindWindowA' (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function GetWindow Lib 'user32' (ByVal hwnd As Long, ByVal wCmd As Long) As Long
Private Declare Function GetWindowText Lib 'user32' Alias 'GetWindowTextA' (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Private Declare Function GetWindowTextLength Lib 'user32' Alias 'GetWindowTextLengthA' (ByVal hwnd As Long) As Long
Private Declare Function PostMessage Lib 'user32' Alias 'PostMessageA' (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Const GW_HWNDFIRST = 0
Const GW_HWNDNEXT = 2
Const WM_CLOSE = &H10
Const WM_QUIT = &H12
Dim CurrWnd As String
Dim ListItem As String
Dim Length As String

Sub GetTaskList()
CurrWnd = GetWindow(Me.hwnd, GW_HWNDFIRST)
Do While CurrWnd <> 0
Length = GetWindowTextLength(CurrWnd)
ListItem = Space(Length + 1)
Length = GetWindowText(CurrWnd, ListItem, Length + 1)
If Length <> 0 Then
lstList.AddItem ListItem
End If
CurrWnd = GetWindow(CurrWnd, GW_HWNDNEXT)
DoEvents
Loop
End Sub

Private Sub cmdClose_Click()
hW = FindWindow(vbNullString, lstList.Text & Chr(0))
PostMessage hW, WM_QUIT, 0, 0
End Sub

Private Sub Form_Load()
Left = (Screen.Width - Width) 2
Top = (Screen.Height - Height) 2
GetTaskList
End Sub
0
Storm
12.09.2007, 23:50 4
For YURA:
Thank you very much. Мне казалось я весь MSDN облазил, ан нет.

For warlord@au.ru:
Покажи мне в списке хоть один экзешник.
GetWindowText() возвращает Caption окна, а не название ехе.
Все равно спасибо.
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.09.2007, 23:50

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Как можно заблокировать переключение на другое приложение
Как можно заблокировать переключение на другое приложение с помощью alt-tab, alt-esc и т.д.?

Передача нажатий клавиш из Excel в другое приложение.
Попрошу не пинать сразу ногами, если не в тот раздел запостил. И так имеется следующая задача: из...

Открывать другое приложение и по telnet'у отсылать ему некоторые команды
Добрый день!!! У меня проблема связанная с winsock.... Скажу сразу с VB знаком буквально пару...

Если приложение запущено, то показать MessageBox и закрыть приложение
Доброго времени. Плохо разбираюсь в с# и прощу помощи написать кусочек кода. Мысль такая &quot;Если...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.