Приостановить resize.

[Deight]

Можно ли приостановить изменение размеров формы если canresize resize:=false не помогает, поскольку использую сторонний компонент dynamicskinform? Так же не помогает minheight как у формы так и у самого компонента.

[Greblin]

А установка свойства BorderStyle формы в значение bsSingle не поможет?

[Deight]

Не помогает и dynamic у меня без исходников(ручками не поправить), и времени очень мало.

[Greblin]

Есть ещё вариант обрабатывать событие onResize и в обработчике менять размеры на исходные, но там может возникнуть мерцание

[Deight]

Ну это тоже не вариант. Нужно так чтоб до формы это сообщение об изменениях размеров вообще не доходило если условие какое-нибудь выполняется.

[NOOB]

сообщение доходить до формы в любом случае будет, но вот можно его обработать (событие FormCanResize) до того как форма решила перерисоваться, мерцать вроде не должно:

procedure TForm1.FormCanResize(Sender: TObject; var NewWidth,
  NewHeight: Integer; var Resize: Boolean);
begin
//  NewWidth:= Form1.width;
//  NewHeight:= Form1.Height;
  Resize:=false;
end;

[Deight]

Я же писал что canresize не поможет, dynamicskin мешает. Если быть точнее то форма такое ощущение что не изменяет размера но сам dynamic рисует форму будто она изменяет размеры.

[Stilet]

Попробуй ловить WM_SIZING

[Kotofff]

Например, чтобы ограничить окно в размерах от 780х530 и до 1024х768 :

procedure TMainForm.WMGetMinMaxInfo(var Info:TWMGetMinMaxInfo);
begin
  with Info.MinMaxInfo^ do
  begin
      ptMinTrackSize.x :=780;
      ptMinTrackSize.y := 530;
      ptMaxTrackSize.x :=1024;
      ptMaxTrackSize.y := 768;
  end;
  inherited;
end;

перед этим объяви ее :

  private
    procedure WMGetMinMaxInfo(var Info: TWMGetMinMaxInfo); message wm_GetMinMaxInfo;

Работает в не зависимости от "скинов" которые установлены у тебя

[Deight]

B каком модуле twmgetminmaxinfo находится, а то пишет undeclared identifier.