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

Вниз

Как сделать чтобы форма при создании не отбирала фокус?   Найти похожие ветки 

 
SergP ©   (2006-07-11 14:43) [0]

Имеется некоторое приложение. Периодически в зависимости от неких событий, оно создает окно, с некими сообщениями.

Конструктор этой формы такой:


constructor TfrmFly.Create(colr:TColor;capt,text:string;timeout:byte);
begin
 Create(Application);
 Color:=colr;
 tag:=1;
 while flayarray[tag] do tag:=tag+1;
 flayarray[tag]:=true;
 Timer1.Interval:=timeout*1000;
 Left:=Screen.WorkAreaRect.Right-Width;
 Top:=Screen.WorkAreaRect.Bottom-Height*tag;
 Label1.Caption:=capt;
 Label2.Caption:=text;
 Show;
 Timer1.Enabled:=true;
 SetWindowPos(Handle,HWND_TOPMOST,Left,Top,Width, Height, SWP_NOREDRAW);
end;


Проблема в том что созданное окошко забирает на себя фокус.
А это неудобно, особенно когда работать приходится с другим приложением.
Например набираю текст в ворде, в определенный момент появляется данное окошко с сообщением, и фокус с ворда переходит на него.
Как избавится от этого?


 
unknown ©   (2006-07-11 15:09) [1]

SetWindowPos(Handle,HWND_NOTOPMOST,Left,Top,Width, Height, SWP_NOREDRAW);


 
SergP.   (2006-07-11 15:35) [2]

> [1] unknown ©   (11.07.06 15:09)
> SetWindowPos(Handle,HWND_NOTOPMOST,Left,Top,Width, Height,
> SWP_NOREDRAW);


проблема в том что окно должно быть "поверх всех окон" но не отбирать фокус...


 
unknown ©   (2006-07-11 16:06) [3]

SetWindowPos(Handle,HWND_TOPMOST,Left,Top,Width, Height, SWP_NOACTIVATE);


 
Leonid Troyanovsky ©   (2006-07-11 19:05) [4]


> SergP.   (11.07.06 15:35) [2]

> проблема в том что окно должно быть "поверх всех окон" но
> не отбирать фокус...


http://rsdn.ru/Forum/Message.aspx?mid=466741&only=1

Вообще-то, отобрать фокус Show может только
у форм своего приложения (но, никак у ворда).
Если, конечно, не менялись настройки системы в сторону old-style.

Ну, а чтобы не отбирать даже у своих, то можно showna vs show

http://groups.google.com/group/fido7.ru.delphi/msg/8f5d2648407f7aa6

--
Regards, LVT.


 
SergP.   (2006-07-11 19:17) [5]

> Вообще-то, отобрать фокус Show может только
> у форм своего приложения (но, никак у ворда).
> ...
>Ну, а чтобы не отбирать даже у своих, то можно showna vs show


В принципе так:
> SetWindowPos(Handle,HWND_TOPMOST,Left,Top,Width, Height,
> SWP_NOACTIVATE);

работает уже нормально.
У своих конечно отбирает фокус, но свои меня не интересуют...



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

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

Наверх





Память: 0.45 MB
Время: 0.012 c
5-1136560770
cp.Silver
2006-01-06 18:19
2006.07.30
Расширенный TTreeView


2-1152354773
Arcalel
2006-07-08 14:32
2006.07.30
удалить папку как


15-1151642342
Alexey V.
2006-06-30 08:39
2006.07.30
Деинсталяция Delphi с сохранением BDE


1-1150257710
xex32
2006-06-14 08:01
2006.07.30
Как принять штрих код со сканера Eclipse в компонент TEdit


15-1151394901
MsGuns
2006-06-27 11:55
2006.07.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
Английский Французский Немецкий Итальянский Португальский Русский Испанский