Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.04.25;
Скачать: CL | DM;

Вниз

Stay On Top   Найти похожие ветки 

 
Leviathan ©   (2001-12-06 21:13) [0]

Приветствую мастеров. Задача такая: нужно написать программу, которая будет видна на верху всегда, т.е. даже тогда, когда экран захватывает какая-нибудь игрушка. Можно ли это сделать и, если да, то как?


 
$Hic0 ©   (2001-12-08 14:58) [1]

:)) Просто указываешь проперти FormStyle в fsStayOnTop


 
Rem ©   (2001-12-08 17:04) [2]

На всякий fsStayOnTop свой fsStayOnTop найдется 8(


 
Leviathan ©   (2001-12-08 18:38) [3]

Вот в том то и дело, что например Half-Life"у фиолетово какой у моей проги FormStyle. Нужно, видимо, получить исключительный доступ к части экрана, но как это сделать?


 
Andrey Klimov   (2002-01-30 12:02) [4]

...

private
{ Private declarations }
procedure CreateParams(var Params: TCreateParams); override;
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

...

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
Inherited CreateParams(Params);
Params.WndParent := GetDesktopWindow;
end;


...

procedure TForm1.FormCreate(Sender: TObject);
begin
inherited; // Create(AOwner);
end;

...

procedure TForm1.FormShow(Sender: TObject);
begin
with Form1 do
SetWindowPos(Handle,
HWND_TOPMOST,
Left,
Top,
Width,
Height,
SWP_NOACTIVATE);

end;



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

Текущий архив: 2002.04.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.01 c
1-80902
Кулюкин Олег
2002-04-15 09:12
2002.04.25
ручная отрисовка ListView, проблемма при изменении ширины столбца


3-80737
Buh
2002-04-06 12:27
2002.04.25
Как вставить запись в таблицу.dbf из таблицы другой базы данных п


1-80874
Alexander K.
2002-04-14 00:05
2002.04.25
Как быстрее всего переделать цветное bmp(24) в монохром(24) ?


1-80983
Dr. Web
2002-04-12 12:47
2002.04.25
Об OpenOffice замолвите слово...


1-80890
Doctor Deejay
2002-04-14 17:21
2002.04.25
Снова RichEdit