|
|
| Тема |
 Always on Top |
|
| Автор | TObject (Нерегистриран) | |
| Публикувано | 22.08.05 09:20 |
|
|
|
В едно приложение имам опция "AlwaysOnTop" за главната форма. Използвам следния код (не използвам свойството FormStyle, за да избегна премигването):
with actAlwaysOnTop do
begin
Checked := not Checked;
if Checked then
SetWindowPos(Self.Handle, HWND_TOPMOST, 0, 0, 0, 0,
SWP_NOREDRAW or SWP_NOSIZE or SWP_NOMOVE)
else
SetWindowPos(Self.Handle, HWND_NOTOPMOST, 0, 0, 0, 0,
SWP_NOREDRAW or SWP_NOSIZE or SWP_NOMOVE)
end;
Как да направя вторична форма Always-On-Top спрямо главната, независимо дали за главната опцията е включена или не?
| |
| |
| 
|
|
