[Gudzik11]

Здравствуйте! Мне нужно чтоб форма была без возможности изменения размера и без возможности перемещения.

Подскажите как сделать ?
Если форма выглядит так

Код:

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
   inherited CreateParams( Params );
  with Params do
  begin
    Style :=(WS_THICKFRAME or WS_BORDER or WS_POPUP);
  end;
end;