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

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

Переключение задач. [D7, WinXP]


X9 ©   (2004-03-09 12:51:00) 

Как бы мне организовать переключение между задачами, как например на TaskBar'e или по Alt+Tab. Я так понимаю, что сначала нужно получить handle'ы всех видимых окон, а при переключении посылать нужному окну WM_ACTIVATE. Если кто-то этим уже занимался, то попрошу дать кусок кода. Ну очень нужно!!!


X9   (2004-03-09 15:01:00) [1]

Большое спасибо!


[lamer]Barmaglot   (2004-03-09 13:29:00) [2]

Вообще-то здесь редко дают код на такую простую задачу...Или у тебя возникли какие-то проблемы? А вообще вот код накиданный за 5 минут.

procedure TForm1.Button1Click(Sender: TObject);
var
 Thd, Thd1:  THandle;
begin
Thd:=GetDesktopWindow;
Thd1:=GetNextWindow(Thd, GW_HWNDNEXT);
BringWindowToTop(Thd1);
SetActiveWindow(Thd1);
end;


Наверх

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