Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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;


Наверх

Титульная страница Поиск, карта сайта Написать письмо