powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как фиксировать форму
8 сообщений из 8, страница 1 из 1
Как фиксировать форму
    #32279595
mirstas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Задача такая - чтоб юзер не мог изменять ни положения ни размера активной формы
...
Рейтинг: 0 / 0
Как фиксировать форму
    #32279616
Фотография JibSkeart
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
размер енто понтно ...

ну а положение ???

хотя можешь отлавливать событие и опять ставить начальные координаты ...
...
Рейтинг: 0 / 0
Как фиксировать форму
    #32279651
mirstas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А по-другому никак?..
...
Рейтинг: 0 / 0
Как фиксировать форму
    #32279664
Фотография Zmeishe
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Проверь возникает ли событие OnClick или OnMouseDown, OnMouseMove на заголовке окна. Если да - блокируй их там.
...
Рейтинг: 0 / 0
Как фиксировать форму
    #32279714
Фотография eNose
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
[не активирован]
[не одобрен]
Form.BorderStyle := bsNone

А вместо Caption - TLabel.
Или отрисовать заголовок вручную.
...
Рейтинг: 0 / 0
Как фиксировать форму
    #32279734
mirstas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо. То что нужно :))
...
Рейтинг: 0 / 0
Как фиксировать форму
    #32280133
StarWind
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
я бы лучше перехватывал событие на движение формы....
а клики мыши по системной области не отлавливаются...
есть два грамотных сообщения, о начале перетаскивания и об окончании... вот их и юзаешь

WM_EXITSIZEMOVE;
WM_EnterSIZEMOVE
...
Рейтинг: 0 / 0
Как фиксировать форму
    #32280306
LVU
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LVU
Гость
Можно еще перехватить WM_NCHITTEST и отвечать всегда HTCLIENT. И убрать biSystemMenu из BorderIcons.
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как фиксировать форму
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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