Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Закрепить форму над другой / 4 сообщений из 4, страница 1 из 1
18.11.2020, 14:12
    #40019929
_Vasilisk_
_Vasilisk_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Закрепить форму над другой
Есть такой код
Код: pascal
1.
2.
3.
4.
5.
procedure TForm1.FormCreate(Sender: TObject);
begin
  Form2 := TForm2.Create(Self);
  Form2.Show;
end;

Можно ли сделать так, чтобы Form2 всегда была над Form1, а для других окон работал обычный Z-Order.

Если сделать
Код: pascal
1.
Form2.FormStyle := fsStayOnTop;

то она поднимается над всеми окнами в системе, а это не нужно.

С уважением, Vasilisk
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.11.2020, 14:31
    #40019938
Dimitry Sibiryakov
Dimitry Sibiryakov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Закрепить форму над другой
Form2.Parent := Form1;
Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.11.2020, 14:41
    #40019942
alekcvp
alekcvp
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Закрепить форму над другой
Dimitry Sibiryakov

Form2.Parent := Form1;

Код: pascal
1.
Form2.PopupParent := Form1;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.11.2020, 14:58
    #40019957
_Vasilisk_
_Vasilisk_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Закрепить форму над другой
Dimitry Sibiryakov
Form2.Parent := Form1;
Прикольно. Но тогда она начинает заползать за клиентскую область родителя.
alekcvp
Код: pascal
1.
Form2.PopupParent := Form1;

То что нужно. Спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Закрепить форму над другой / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 463ms
Закрыть
start [/forum/topic.php?fid=58&tablet=1&tid=2037855]:
 0ms
get settings:
 8ms
get forum list:
 18ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 169ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 34ms
get tp. blocked users:
 1ms
others: 218ms
total:  463ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]