Form

  • Автор темы Leos
  • Дата начала
Статус
Закрыто для дальнейших ответов.
L

Leos

Как сделать, что бы форма была всегда поверх другой и при этом всё время была активна (выделена), но не модальна.
Например как панель инструментов в photodhop'e?
 
G

Guest

Leos
чтобы была поверх - надо установить onTop.
 
B

Barmutik

Выставь у формы fsStayOnTop...

Но этого может оказаться мало ...

Если будет мало докинь вопрос я код запощу который гарантирует что форма всегда будет видна сверху.
 
A

admin

Leos
можно через WinAPI
Код:
 // Окно поверъ других
procedure OnTop(Form: Thandle; const ShowOnTop: Boolean);
var
Where: HWnd;
begin
if ShowOnTop then begin
 Where := HWND_TOPMOST;
//  windows.SetParent(form, HWND_Desktop);
end
else
 Where := HWND_NOTOPMOST;
SetWindowPos(Form, Where, 0, 0, 0, 0,
 SWP_NOACTIVATE or SWP_NOMOVE or
 SWP_NOSIZE or SWP_NOSENDCHANGING);
 BringWindowToTop(Where);
end;

Юзай наздоровье :)
 
Статус
Закрыто для дальнейших ответов.
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!