Windows7でフォームを透過させるには？ (ID:38465)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 procedure WMEraseBkgnd(var msg: TWMEraseBkgnd);message WM_ERASEBKGND; として procedure WMEraseBkgnd(var msg: TWMEraseBkgnd); begin msg.Result := 1; end; で背景が透過するフォームを作成できますが、WindowsVista以前だとうまくいくのですがWindows7だと透過しません。 Windows7でフォームを透過させるにはどうすればいいのでしょうか。 Delphi5です。