简单的delphi实现半透明窗体的源码,不需要任何三方控件