1、使Form没有标题栏和边框，只需要设置BorderStyle:=bsNode;
2、使Form透明，即只显示控件，假设Form尺寸：300*400，控件尺寸：200*200；
a、procedure TForm1.FormCreate(Sender: TObject);
begin
BorderStyle := bsNone;
Brush.Style := bsClear;
end;
只是使Form透明了，但所占据的空间还在，即点击Form的透明区域，其他应用获取不到焦点，鼠标其实还在From上。
b、设置Form的Color和TransparentColorValue属性值相同，并且使TransparentColor值为True。
该方法可以使Form真正的透明，即使点击Form的透明区域，其他的应用也可以获得焦点，就好像透明区域真的不存在一样。