Имя: Пароль:
1C
 
Как получить список окон запущенных приложений?
,
0 DenIv
 
22.07.09
10:52
Добрый день господа!
Собсно сабж, из 1с8 возможно получение списка?
1 DenIv
 
22.07.09
10:54
давно небыл, по ходу мельчает форум :(, сполшной флуд, типа помогите купить велосипед, мимолетный секс, и.т.д, жаль...
2 Rie
 
22.07.09
10:58
(0) WScript не поможет?
3 DenIv
 
22.07.09
11:32
поможет, пример можно?
4 GedKo
 
22.07.09
11:48
tasklist.exe
5 DenIv
 
22.07.09
11:56
(2) хотел увидеть пример, кот получет список именоо окон (не процессов - это без проблем)!
6 DenIv
 
22.07.09
11:57
(4) - это список процессов! его я умею получать через WMI
7 H A D G E H O G s
 
22.07.09
11:57
(5) Тебе вообще все окна нужны, или только top-level?
8 DenIv
 
22.07.09
12:19
(7) все
9 H A D G E H O G s
 
22.07.09
12:22
Возьми Нетленку, там это реализовано
10 H A D G E H O G s
 
22.07.09
12:25
http://www.infostart.ru/projects/1737/
Объект
Addin.Windows

Объект.ПолучитьДревоОкон(Объект.ДескрипторРабочегоСтола)
11 DenIv
 
22.07.09
12:30
без ВК никак?
12 DenIv
 
22.07.09
12:32
и еще вопрос, как активировать окно зная хендл?
13 dk
 
22.07.09
12:34
погляди на AutoIt
правда там exe придется формировать
14 H A D G E H O G s
 
22.07.09
12:36
(12)
Объект.АктивироватьОкно(Дескриптор);
15 DenIv
 
22.07.09
12:39
(13) вез внешних с-в
список окон и их хэндлов научился получать, вернее нашел на форуме, теперь нужно активировать окно зная хэндл
16 DenIv
 
22.07.09
13:03
()up
17 dk
 
22.07.09
13:08
$var = WinList()

For $i = 1 to $var[0][0]
 ; Only display visble windows that have a title
 If $var[$i][0] <> "" AND IsVisible($var[$i][1]) Then
   MsgBox(0, "Details", "Title=" & $var[$i][0] & @LF & "Handle=" & $var[$i][1])
 EndIf
Next

Func IsVisible($handle)
 If BitAnd( WinGetState($handle), 2 ) Then
   Return 1
 Else
   Return 0
 EndIf

EndFunc
18 dk
 
22.07.09
13:08
)
Программист всегда исправляет последнюю ошибку.