Шаг 71 - Program Manager показывает группы

Данное понятие пошло от Windows 3.1. В Windows 3.1 Program Manager отвечал за работу программ, работу с группами и ярлыками. На данный момент он как таковой отсутствует в системе и его функции выполняет Exploler, но для сохранения совместимости от все так же может выступать в роли DDE сервера который будет показывать группы и программах в меню Пуск. Смотрим, у меня есть группа WinZip.

gif/71_1.gif (5097 b)

Вот ее я и хочу показать на экране. Создаем обычное приложение VB. С текстовым полем и кнопкой.

gif/71_2.gif (2541 b)

К кнопке пишем код.

Private Sub Command1_Click()
	Text1.LinkTopic = "Progman|Progman"		'С кем связь
	Text1.LinkMode = 2				' Режим ручной
	Text1.LinkExecute "[ShowGroup(WinZip,7)]" 	' Команда
End Sub

В ответ нам покажут группу в обычном виде.

gif/71_3.gif (4864 b)

Синтаксис для ShowGroup команды имеет эту форму:

ShowGroup(GroupName,ShowCommand[,CommonGroupFlag])

Мы с Вами указали имя группы и параметр как эту группу отображать на экране.


Предыдущий Шаг | Следующий Шаг | Оглавление
Автор Каев Артем.