Сделать активным окно сторонней программы

@Emser · Регистрация: 25.06.2006

Студворк — интернет-сервис помощи студентам

Здравствуйте.
Прошу помощи в данном вопросе, т.к. поиски по гуглам-яндексам, форумам и статьям выдают что то рядом, но не то.
Имею программу (например test.exe)
Хотел использовать SetActiveWindow или SetForegroundWindow, но запутался в хэндлах и идпроцах...
Есть фрагмент закрытия такой программы:

VB.NET
1
2
3
4
5
6
7
8
9
10
11
        Dim Processes() As Process
        Dim Proc As Process
        Processes = Process.GetProcessesByName("test.exe") 'Закрываем программу
        For Each Proc In Processes
            'Попытка закрыть программу по хорошему
            Proc.CloseMainWindow()
            'Если по хорошому не получилось то закрываем по плохому
            If Not Proc.HasExited Then
                Proc.Kill()
            End If
        Next

Так вот я не пойму: если я программу уже идентифицировал по имени процесса, ПОЧЕМУ я не могу по этому же имени сделать активной её окно???
Или как то можно?
Заранее спасибо.

@Emser · 22.06.2015, 17:45 **[ТС]**

А из свёрнутого состояния блокнота?
А в таком то варианте и меня SetWindowPos работает.
Надо из свёрнутого!

Памирыч · 22.06.2015, 17:47

Emser, нет конечно. Это просто активация окна

@Emser · 22.06.2015, 18:58 **[ТС]**

Хорошо, возможно я не так выразился или скажем так: не знал терминов что ли...
А как тогда называется "доставание" программы из свёрнутого состояния, или например из трея?
И как это делать? Ну вот, всё сначала...

Памирыч · 22.06.2015, 18:59

Сделать активным окно сторонней программы

Памирыч · 22.06.2015, 19:13

Сообщение от Emser

из свёрнутого состояния, или например из трея

Я не большой знаток API, но мне кажется, эти понятия совсем разные.
Развернуть окно, думаю, не большая проблема, но вот чтоб из трея... Это, имхо, не так просто

Добавлено через 10 минут
Из свернутого

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
    <DllImport("user32.dll")> _
Private Shared Function ShowWindowAsync(ByVal hWnd As IntPtr, ByVal nCmdShow As Integer) As Boolean
    End Function
 
    Private Const SW_SHOWNORMAL As Integer = 1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim P As Process = Process.GetProcessesByName("notepad")(0)
        Dim hWnd As IntPtr = P.MainWindowHandle
        If Not hWnd.Equals(IntPtr.Zero) Then
            ShowWindowAsync(hWnd, SW_SHOWNORMAL)
        End If
    End Sub

@Emser · 24.06.2015, 04:55 **[ТС]**

СПАСИБО!
Именно этот вариант помог!
Только с константой SW_RESTORE.
Предложенная "шоунормал" действительно "поднимает" из свёрнутого состояния, а вот из трея через раз как то.
А вот "рестор" отлично достаёт мою(нужную мне) программу и из трея и из свёрнутого.
Всем спасибо!

Новые блоги и статьи Все статьи Все блоги /
Доктрина интенционального знания - Доктрина для портала "Срез". Hrethgir 25.07.2026 Может найдётся кто захочет оценить доктрину. . . Написания правил участия для меня роскошь, требующая лимита времени, поэтому все сообщения не прошедшие модерацию будут видны только участникам портала,. . .	сукцессия 44. Решил подать на припринт в межународные сервисы препринтов. Но нужно одобрение от ученых anaschu 25.07.2026 Английский вариант. Пока кто то не одобрит мою личность, мне не получиться это опубликовать на препринте. Но заявку на публикацию статьи я сегодня подам.	сукцессия 43. Вторая научная статья за месяц- прайминг и гатгил anaschu 25.07.2026 две стороны одной монеты	Более приземисто - Эстафету хвоста в .cdl (деревья эстафеты в сад). Hrethgir 24.07.2026 В будущем, после написания блока инверсии обхода дерева (эстафеты хвоста), я планирую вернуться к нашему прошлому разговору о том, обладают ли знания целеполаганием. Тогда я пришел к выводу, что. . .
Вот представьте что вам дали бессмертие. kumehtar 24.07.2026 Вот представьте что вам дали бессмертие, ничего более не меняя. Вообще ничего, только бессмертие в нынешнем виде. Рады были бы? Что бы вы тут делали всё это время? Никакой пенсии. Никакого нового. . .	сукцессия 41 anaschu 24.07.2026 Численная верификация бифуркации в агентной модели лесной сукцессии: от одного параметра к ансамблю Автор: пользователь @Shumilov_AS \| Раздел: Прикладная математика / Численные методы Кратко. . .	сукцессия 40. Ансамблевая кластерная параметризаци, часть 1. anaschu 24.07.2026 Пр# Сопровождение научной статьи ИИ-ассистентом: подготовка публикации и калибровка агентно-ориентированной модели сукцессии микоризных систем Полевые заметки о двухнедельной совместной работе. . .	Теория всего 12. ВГК на планете в стратегической игре "терра" anaschu 21.07.2026 ### Главные семантические изменения и дешифровка новой физики 1. `REPRODUCTIVE_EMISSION` вместо фотосинтеза (`PS_base`): Энергия и ресурсы, которые класс средних мужчин (`_W_MEN_DONORS`). . .

@Emser 4 / 4 / 0 Регистрация: 25.06.2006 Сообщений: 81
	22.06.2015, 17:45 [ТС]
	А из свёрнутого состояния блокнота? А в таком то варианте и меня SetWindowPos работает. Надо из свёрнутого! 0

Памирыч Почетный модератор 23251 / 9165 / 1084 Регистрация: 11.04.2010 Сообщений: 11,014
	22.06.2015, 17:47
	Emser, нет конечно. Это просто активация окна 0

@Emser 4 / 4 / 0 Регистрация: 25.06.2006 Сообщений: 81
	22.06.2015, 18:58 [ТС]
	Хорошо, возможно я не так выразился или скажем так: не знал терминов что ли... А как тогда называется "доставание" программы из свёрнутого состояния, или например из трея? И как это делать? Ну вот, всё сначала... 0

Памирыч Почетный модератор 23251 / 9165 / 1084 Регистрация: 11.04.2010 Сообщений: 11,014
	22.06.2015, 18:59
	1

@Emser 4 / 4 / 0 Регистрация: 25.06.2006 Сообщений: 81
	24.06.2015, 04:55 [ТС]
	СПАСИБО! Именно этот вариант помог! Только с константой SW_RESTORE. Предложенная "шоунормал" действительно "поднимает" из свёрнутого состояния, а вот из трея через раз как то. А вот "рестор" отлично достаёт мою(нужную мне) программу и из трея и из свёрнутого. Всем спасибо! 0

Сделать активным окно сторонней программы

Решение