[slavik1986]

Всем привет.

Возникла небольшая проблема. Для главного окна были заданы ограничения на минимальный размер через свойство Constraints. При изменении размера за нижний или правый край окна все проходит замечательно. Окно уменьшается до заданных размеров и больше не шевелится. А если уменьшать за левую или верхнюю грань, то по достижении минимального размера окно начинает двигаться по экрану вслед за мышкой. Нельзя ли сделать так, чтобы оно вело себя как и положено, т.е. оставалось на месте.

Заранее благодарен за внимание.

[slavik1986]

ЭЭЭ, профи, ау

[AleD]

вообще это обычное поведение окон в винде, зачем его менять? для чего это нужно?

зы: этот сайт в основном для среднячков, есть конечно и профи, но они как мне кажется редковато заходят сюда (не считая модеров)

[slavik1986]

Вообще-то окно должно вести себя как и описано, взять хотя бы окошки в самой Delphi. Я сам никогда бы этим не заморочился, если бы заказчики не попросили разобраться.

[k@Z@k]

Код:

..... 
private
    procedure WMGetMinMaxInfo(var Msg: TWMGetMinMaxInfo);message WM_GETMINMAXINFO;
.....
procedure TForm3.WMGetMinMaxInfo(var Msg: TWMGetMinMaxInfo);
begin
 inherited;
  with Msg.MinMaxInfo^.ptMinTrackSize do
   begin
    x:= 760; // ptMaxTrackSize.x:= form3.width;
    y:= 570;// ptMaxTrackSize.y:= form3.height;
   end;
end;