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

Вниз

Always on Top   Найти похожие ветки 

 
id_privin ©   (2002-10-14 12:42) [0]

Есть приложение. В нем дофига форм. Одна из них навигатор для всех остальных. Как сделать так что-бы эта форма всегда висела поверх остальных (как аська или таск менаджер). Как это сделать для формы которая отдельное приложение очевидно.

Но как это сделать в рамках одного приложения ???


 
AL2002 ©   (2002-10-14 12:52) [1]

Чё-то там Parent Top вроде.


 
id_privin ©   (2002-10-14 12:57) [2]

Вопрос вроде как можно переформулироть так :

Как показать неактивную форму выше активной? Если это сделать нельзя, то как в одном приложении сделать две активных формы?


 
Крот   (2002-10-14 12:59) [3]

FormStyle := fsStayOnTop;


 
[NIKEL] ©   (2002-10-14 13:07) [4]

а если не будет работать Крот(14.10.02 12:59)
то добавь Application.RestoreTopMosts в обработчик события формы OnPaint


 
Song ©   (2002-10-14 14:28) [5]

Для того чтобы быть выше форм своего проекта достаточно fsStayOnTop. Для окон других приложений нужно использовать SetWindowPos()


 
saxon ©   (2002-10-14 14:38) [6]

это для "окон других приложений" (Song © (14.10.02 14:28))
procedure Form1.CreateParams(var Params: TCreateParams);
begin
inherited;
with Params do begin
Style := (Style or WS_POPUP) and (not WS_CHILD);
WndParent := HWND_DESKTOP;
end;
end;

procedure Form1.FormActivate(Sender: TObject);
begin
SetWindowPos (Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE OR SWP_NOSIZE);
end;


 
Игорь Шевченко ©   (2002-10-14 15:07) [7]

В кладовке, в разделе "Готовые программы" лежит программа StayOnTop - может, чем поможет ?



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

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

Наверх




Память: 0.47 MB
Время: 0.013 c
14-78583
Sergo
2002-10-01 13:07
2002.10.24
Самара


14-78607
dma
2002-10-02 19:31
2002.10.24
Где найти RX компоненты для Delphi 7?


4-78718
carmen
2002-09-12 01:08
2002.10.24
Как полностью изменить стандартный вид формы


1-78413
Дмитрий К.К.
2002-10-15 12:14
2002.10.24
External exception


14-78650
Nox
2002-10-01 19:47
2002.10.24
<<<Я ДОБАВИЛ СВОЙ ВОПРОС В ФОРУМ, А ОН УШЁЛ!>>>