Вниз
Скачать: CL | DM;

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

← →
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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c
1-1150445348
Уля
2006-06-16 12:09
2006.07.30
создание Excel-документа с помощью Delphi


2-1152436302
NAS
2006-07-09 13:11
2006.07.30
Регистрация в базе


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


15-1151668888
PSPF2003
2006-06-30 16:01
2006.07.30
Мертвые ссылки


2-1152121542
Учениг
2006-07-05 21:45
2006.07.30
Размер переменной в памяти




   Наверх