| 订阅 | 在线投稿
分享
 
 
 

Delphi中如何做透明的窗体

来源:互联网网民  宽屏版  评论
2006-12-16 17:27:50

我 想 做 一 个 透 明 的 Form

不 是 用 一 个 bmp外 加 一 个 mask的 那 种 。 也 不 用 控 件 , 在 VB中 可 以

使 用 几 个 参 数 即 可 , ( 可 在 这 里 找 到 QA000129

“如何使窗口透明”) , 但 相 同 的 办 法 用 在 delphi中 却 不 行 。 请 问 如 何 做 一 个 这 样 的 form? 简

单 , 代 码 少 , 不 用 控 件 。

Delphi中 可 以 这 样 做 :

procedure TForm1.FormCreate(Sender: TObject);

begin Brush.Style:= bsClear;

BorderStyle := bsNone

end;

 
特别声明:以上内容(如有图片或视频亦包括在内)为网络用户发布,本站仅提供信息存储服务。
 
我 想 做 一 个 透 明 的 Form 不 是 用 一 个 bmp外 加 一 个 mask的 那 种 。 也 不 用 控 件 , 在 VB中 可 以 使 用 几 个 参 数 即 可 , ( 可 在 这 里 找 到 QA000129 “如何使窗口透明”) , 但 相 同 的 办 法 用 在 delphi中 却 不 行 。 请 问 如 何 做 一 个 这 样 的 form? 简 单 , 代 码 少 , 不 用 控 件 。 Delphi中 可 以 这 样 做 : procedure TForm1.FormCreate(Sender: TObject); begin Brush.Style:= bsClear; BorderStyle := bsNone end;
󰈣󰈤
 
 
 
>>返回首页<<
 
 热帖排行
 
 
 
静静地坐在废墟上,四周的荒凉一望无际,忽然觉得,凄凉也很美
©2005- 王朝网络 版权所有