gdiplus实现程序窗口阴影效果

.如果真 (是否为空 (阴影大小))
阴影大小 ＝ 15
.如果真结束
阴影 ＝ 创建发光矩形 (依附窗口.宽度, 依附窗口.高度, #白色, 0, 阴影大小, #黑色, 255)
窗口编号 ＝ 取编号 ()
依附线程编号 ＝ 取数组成员数 (线程句柄) ＋ 1
加入成员 (线程句柄, 0)
加入成员 (阴影的大小, 阴影大小)
加入成员 (依附的窗口, 依附窗口)
加入成员 (速度, 0)
载入 (取窗口 (窗口编号), , 假)
置窗口PNG外型 (取窗口 (窗口编号).取窗口句柄 (), 阴影)
取窗口 (窗口编号).置外形图片 (创建矩形 (依附窗口.宽度, 依附窗口.高度, 阴影大小), #品红)
取窗口 (窗口编号).移动 (依附窗口.左边 － 阴影大小, 依附窗口.顶边 － 阴影大小, 依附窗口.宽度 ＋ 阴影大小 × 2, 依附窗口.高度 ＋ 阴影大小 × 2)
取窗口 (窗口编号).可视 ＝ 真
.如果真 (自动调整)
速度 [依附线程编号] ＝ 调整延时
启动线程 (&依附处理, 依附线程编号, 线程句柄 [依附线程编号])