Delphi中如何做透明的窗体

我 想 做 一 个 透 明 的 Form

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

使 用 几 个 参 数 即 可 ， （ 可 在 这 里 找 到 QA000129

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

单 ， 代 码 少 ， 不 用 控 件 。

Delphi中 可 以 这 样 做 ：

procedure TForm1.FormCreate(Sender: TObject);

begin Brush.Style:= bsClear;

BorderStyle := bsNone

end;