ウィンドウの下に影を描画する

　フォームの CreateParams で、スタイルに CS_DROPSHADOW を割り当てるといいようです。ただし、影が描画されるのはメインウィンドウの下だけです。 ( Form1 と Form2 がある場合、Form2 の影は Form1 の表面には描画されません)

■ ウィンドウの下に影を描画する例 
type
  TForm2 = class(TForm)
  private
    { Private 宣言 }
  protected
    procedure CreateParams(var Params: TCreateParams); override;
  public
    { Public 宣言 }
  end;

var
  Form2: TForm2;

implementation

{$R *.dfm}

procedure TForm2.CreateParams(var Params: TCreateParams);
const
  CS_DROPSHADOW = $00020000;
begin
  inherited;
  Params.WindowClass.Style := Params.WindowClass.Style or CS_DROPSHADOW; 
end;