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

Вниз

Хочу сделать СУПЕРГЛАВНОЕ окно   Найти похожие ветки 

 
Кириешки ©   (2004-07-31 18:06) [0]

Хочу сделать СУПЕРГЛАВНОЕ окно. Делаю так :

MainWnd :=
CreateWindowEx(WS_EX_TOOLWINDOW or WS_EX_TOPMOST,
MainClassName, nil, WS_POPUP or WS_VISIBLE,
1, 1, 15, 15, 0, 0, HInstance, nil);

Почему находятся окна главнее - например тот-же самый ACDSee Browser в режиме полноэкранного просмотра? И можно ли сделать так чтобы мое окно было абсолютно над ВСЕМИ окнами ?


 
Timedrops ©   (2004-07-31 18:16) [1]

Я когда делал программу управления для клуба, то
блокиратор экрана сделал так - просто и сердито:

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

Всё! Кроме моего окна ничего не видно.
Это имелось в виду?


 
Кириешки ©   (2004-07-31 18:22) [2]

>Timedrops ©   (31.07.04 18:16) [1]

Нет, я делаю программу для племянника и мне надо сделать небольшое окошко в углу экрана которое всегда висело бы над другими окнами.

ЗЫ. Предложеный вами вариант я знаю, но его очень просто обойти - всунуть в сидюк диск с автораном и оно свернется.


 
Sergey Kaminski ©   (2004-07-31 18:30) [3]

Суперглавное? Это так что-ли:
FormStyle := fsStayOnTop?


 
Кириешки ©   (2004-07-31 18:39) [4]

>Sergey Kaminski ©   (31.07.04 18:30) [3]

"Суперглшавное" - это потому что я больше никокого описания для данного случая не нашел. StayOnTop и не канает. Попробуйте сделать StayOnTop и запустить ACDSee Browser в режиме полноэкранного просмотра. Ну поймите, мне надо чтобы это окно висело что бы мой племянник не делал - играл, смотрел картинки или просто лизил по компу. КАК?????


 
Timedrops ©   (2004-07-31 18:57) [5]

Пробывал! -  видно моё окно
FormStyle := fsStayOnTop - работает

у меня ACDSee version 3.0
У тебя какая?

Напиши поток - и обновляй, перерисовывай своё окно.


 
GuAV ©   (2004-07-31 19:15) [6]


> Нет, я делаю программу для племянника и мне надо сделать
> небольшое окошко в углу экрана которое всегда висело бы
> над другими окнами.

А может лучше у края экрана Application Desktop Toolbar - это как панель задач будет видно всегда.


 
Кириешки ©   (2004-07-31 19:30) [7]

Timedrops ©   (31.07.04 18:57) [5]

У меня 5-ая.

GuAV ©   (31.07.04 19:15) [6]

Application Desktop Toolbar - что это такое, я чё то не понял


 
GuAV ©   (2004-07-31 19:32) [8]


> Application Desktop Toolbar - это как панель задач

Панель инсрументов офиса, панели проводника, штука на которой пуск. SHAppBarMessage.


 
parovoZZ ©   (2004-07-31 21:05) [9]

Делай так -
через определённые промежутки времени (раз в сек., например) проверяй это условие:

if (GetTopWindow (0) <> Handle) then SetWindowPos(Handle, {HWND_TOPMOST}0, X, Y,                                        Width, Height, {SWP_NoMove or SWP_NoSize or SWP_ShowWindow}0);//Handle - хэндл твоего окна.

Флаги нужные сам поставь, висит 100% над всеми окнами, кроме окна DierctX.


 
Gero ©   (2004-07-31 21:42) [10]


> Кириешки ©

А представь ситуацию:
Ты сделаешь суперглавное окно и я такое же супергланое окно.
Какое же из них будет главнее?..


 
parovoZZ ©   (2004-07-31 22:50) [11]

>А представь ситуацию:
>Ты сделаешь суперглавное окно и я такое же супергланое окно.
>Какое же из них будет главнее?..

Ну, суперглавное окно будет всяко главнее, чем супергланое))


 
Кириешки ©   (2004-07-31 23:02) [12]

Спасибо всем. Попробую.



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

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

Наверх




Память: 0.47 MB
Время: 0.03 c
6-1085922572
Piter
2004-05-30 17:09
2004.08.15
NetMessageBufferSend


8-1085915333
Steef
2004-05-30 15:08
2004.08.15
TMediaPlayer


1-1091134257
nick_mas
2004-07-30 00:50
2004.08.15
Как создать свою кнопку в Delphi?


4-1080805108
shiller
2004-04-01 11:38
2004.08.15
Скрытие процесса в NT


8-1085611549
Net
2004-05-27 02:45
2004.08.15
Видио или не видио???





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский