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




Вниз

Как создать форму 


Alex86   (2002-02-05 10:34) [0]

Нужно создать форму, распологающуюся над кнопкой "Пуск", что бы она всегда оставалась на переднем плане,(т.е. не перекрывалась бы открыващимся меню "пуск"). Спасибо.



Виктор Щербаков   (2002-02-05 10:44) [1]

WindowState := wsMaximized,
FormStyle := fsStayOnTop;
BorderStyle := bsNone;



drpass   (2002-02-05 10:48) [2]

> Виктор Щербаков
А она все равно будет перекрываться меню "Пуск". Тут нужно вешать хук на кнопку и после нажатия программно прибивать меню.



Виктор Щербаков   (2002-02-05 11:10) [3]

Хоть и некрасиво, но проще чем хук.
Выключаем
EnableWindow(GetWindow(FindWindow("Shell_TrayWnd", nil), GW_CHILD), false);
Включаем
EnableWindow(GetWindow(FindWindow("Shell_TrayWnd", nil), GW_CHILD), true);



Pat   (2002-02-05 12:19) [4]

var Rect:TRect;
..............
GetWindowRect(handle,Rect);
SetWindowPos(Handle,HWND_TOPMOST,Rect.Left,Rect.Top,Rect.Right-Rect.Left,Rect.Bottom-Rect.Top, SWP_SHOWWINDOW);




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




Наверх





Память: 0.72 MB
Время: 0.014 c
1-66575           ctapik-net            2002-01-29 14:29  2002.02.21  
Как узнать над каким итемом combobox а находится курсор?


3-66479           niks                  2002-01-28 08:35  2002.02.21  
VCL 8.5 от Crystal Report


3-66451           ed                    2002-01-21 08:39  2002.02.21  
Несколько запросов и временные таблицы в ADO


3-66425           serg_s                2002-01-25 16:55  2002.02.21  
Прерывание ассинхронного выполнеия TADOStoredProc


6-66636           Крис                  2001-12-04 16:39  2002.02.21  
Где скачать INDY???!!!