delphi 窗体只显示控件

procedure TForm1.FormCreate(Sender: TObject);
begin
  BorderStyle := bsNone;
  Brush.Style := bsClear;
end;