[aleksnine]

Привет.
Делаю так -

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

Всё работает , но появляется бордюр у формы.
Возможно ли сделать тоже самое , но чтобы форма выглядела как при bsnone, т.е без бордюра.