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

名前

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

本文 var hw: HWND; Style: Integer; begin hw := Self.Handle; Style := GetWindowLong(hw, GWL_EXSTYLE); Style := Style or WS_EX_LAYERED; SetWindowLong(hw, GWL_EXSTYLE, Style); SetLayeredWindowAttributes(hw, 0, 175, LWA_ALPHA); //175は適当 end; とかでも無理？