Jak zmienić rozmiar formy o właściwości border style bsnone

Kawałek kodu źródłowego rozwiąże sprawę. Oczywiście ustawiamy Border Style na bsNone i teraz do public wstawiamy:

procedure CreateParams(var Params: TCreateParams); override; 

Teraz taka procedurka:

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

I gotowe wszystko działa.