![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TaskBar Auto hide [D4, Win95/98, WinXP]
Vlad40 © (2004-06-02 14:51:00)Мне нужно из программы переключать состояние TaskBar - включать или выключать флажок Auto hide. Какой параметр в Registry отвечает за этот флажок? (если это конечно сидит в Registry). Спасибо.
Vlad40 (2004-06-03 13:58:00) [1]Удалено модератором
Примечание: Создание пустых сообщений
Vlad40 (2004-06-03 11:30:00) [2]По идее должно бы помочь. Но что-то не получается. Делаю так:
procedure TForm1.Button4Click(Sender: TObject);
var
AppBarData : TAppBarData;
begin
AppBarData.hWnd := FindWindow('Shell_TrayWnd', nil);
AppBarData.cbSize := sizeof(AppBarData);
AppBarData.lParam:=1;
AppBarData.uEdge:=ABE_BOTTOM;
SHAppBarMessage(ABM_SETAUTOHIDEBAR, AppBardata);
end;
В результате ничего не происходит. Не могу понять в чем моя ошибка
MetalFan (2004-06-02 15:31:00) [3]http://www.delphisyte.ru/Articles/base2/taskbar_coords.html
может поможет?
Vlad40 (2004-06-02 15:18:00) [4]Кто-то может помочь?
Vlad40 (2004-06-02 14:59:00) [5]Попробовать-то можно. Но так я просто скрываю ли показываю окно таскбара. А мне его переводить в состояние Auto hide и наоборот
Vit@ly (2004-06-02 14:55:00) [6]Можно поробовать так:
procedure TForm1.Button1Click(Sender: TObject);
Var hTaskBar : THandle;
begin
hTaskbar := FindWindow('Shell_TrayWnd', Nil);
ShowWindow(hTaskBar, SW_HIDE);
end;
procedure TForm1.Button2Click(Sender: TObject);
Var hTaskBar : THandle;
begin
hTaskbar := FindWindow('Shell_TrayWnd', Nil);
ShowWindow(hTaskBar, SW_SHOWNORMAL);
end;