Как включить Quick Launch у пользователей терминального сервера.

Как включить Quick Launch у пользователей терминального сервера.

Venberg

Новый участник

Сообщения: 8
Благодарности: 0

Доброго Времени суток господа!

Подскажите пожалуйста, как через реестр включить у пользователей терминального сервера Quick Launch?
Самой папки нет в профилях. Если ее не создать скриптом, то раскидаю по профилям вручную.
Не хотелось бы заходить под логином каждого из 70 пользователей и включать quick launch вручную.
Можно ли будет сделать скрипт запускаемый при входе пользователя только один раз, а не при каждом входе пользователя на терминал?

Отправлено: 19:28, 06-06-2006

iptyt

Новый участник

Сообщения: 1
Благодарности: 0

Профиль | Отправить PM | Цитировать

Доброго Времени суток.

-----------------------------------------------------------------
const
WMTRAY_TOGGLEQL = WM_USER + 237;

procedure TForm1.Button1Click(Sender: TObject);
begin
SendMessage(FindWindow('Shell_TrayWnd', nil), WMTRAY_TOGGLEQL, 0, 1); // Включить
(*
SendMessage(FindWindow('Shell_TrayWnd', nil), WMTRAY_TOGGLEQL, 0, 0); // Отключить
*)
end;
-----------------------------------------------------------------

Отправлено: 19:05, 06-12-2012 | #2