Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.12.30;
Скачать: [xml.tar.bz2];

Вниз

Кнопка /Пуск/   Найти похожие ветки 

 
Clift   (2003-12-17 15:23) [0]

OnCreate
hTaskBar:= FindWindow("Shell_TrayWnd", nil);
hButton:= GetWindow(hTaskBar, GW_CHILD);
ShowWindow(hButton, SW_HIDE);
OnClose
ShowWindow(hButton, SW_NORMAL);
Работает нормально т.е. кнопка после завершения ВИДНА
а если так
OnCreate
hTaskBar:= FindWindow("Shell_TrayWnd", nil);
hButton:= GetWindow(hTaskBar, GW_CHILD);
SetWindowPos(hButton,HWND_TOP,0,0,0,0,SWP_SHOWWINDOW);
OnClose
ShowWindow(hButton, SW_NORMAL);

то после завершения программы её НЕВИДНО

BringWindowToTop в OnCreate также ничего не дало.
Если SetWindowPos(hButton,HWND_TOP,0,0,0,0,SWP_SHOWWINDOW)
заменить на MoveWindow(hButton,0,0,0,0,True) то ситуация неизменяется.
p.s. Кнопка становится видна лишь после того как попробовать изменить
размеры TaskBar.Я экспериментировал с SWP_и SW_ но ничего не получилось.
Кнопка становилась видимой только после SW_MAXIMIZE но это не то чего я хотел
добиться;)
Как сделать чтобы после того как Пуск перидвинут он стал видимым
(конечно учитывая что в SetWindowPos будет изменяться лишь X координата)


 
Clift   (2003-12-17 15:32) [1]

Неужели никто неподкинет какую-то идею?



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.12.30;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.009 c
1-99639
lena19
2003-12-16 20:24
2003.12.30
проверка времени


8-99662
mrAld
2003-08-28 14:33
2003.12.30
Термин


4-99817
Sadya
2003-11-02 14:52
2003.12.30
Программно вызвать нажатие кнопки


1-99579
AD_infiniTUM
2003-12-17 15:40
2003.12.30
Рисование стрелки


1-99546
KOT
2003-12-16 08:26
2003.12.30
Как ине задать таймер чтобы систему не грузить





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский