Отключите изменение размеров формы в Дельфи

Если вы хотите, чтобы ваша форма вообще не изменяла размер, тогда установка стиля границы формы на bsSingle - правильное решение, так как в этом случае курсор мыши не изменится на один из курсоров изменения размера при перемещении над границами формы, поэтому пользователю очевидно, что размер этой формы нельзя изменить.

Если вы хотите установить минимальный и / или максимальный размер для формы, тогда bsSizeable - правильный стиль границы, и вы можете использовать Ограничения формы, чтобы указать пределы. Однако существует проблема, заключающаяся в том, что свойство Constraints не препятствует изменению размера формы, а только заставляет размеры корректироваться постфактум, чтобы ограничения не нарушались. Это будет иметь негативный побочный эффект: изменение размера формы с левой или верхней границей приведет к ее перемещению. Чтобы этого не произошло, вам нужно в первую очередь предотвратить изменение размера. Windows отправляет сообщение WM_GETMINMAXINFO для получения минимального и максимального размеров отслеживания для окна верхнего уровня. Обработка этого и возврат правильных ограничений устраняет проблему с подвижной формой:

type
  TForm1 = class(TForm)
  private
    procedure WMGetMinMaxInfo(var AMsg: TWMGetMinMaxInfo);
      message WM_GETMINMAXINFO;
  end;

// ...

procedure TForm1.WMGetMinMaxInfo(var AMsg: TWMGetMinMaxInfo);
begin
  inherited;
  with AMsg.MinMaxInfo^ do begin
    ptMinTrackSize := Point(Constraints.MinWidth, Constraints.MinHeight);
    ptMaxTrackSize := Point(Constraints.MaxWidth, Constraints.MaxHeight);
  end;
end;