四周带阴影的无边框窗口（DELPHI源代码）

四周带阴影的无边框窗口（DELPHI源代码）使用说明：1、将Vcl.ShadowForms加入Uses;2、将默认的TForm1=class(TForm)改为TForm1=class(TShadowForm);3、将Form的BorderStyle改为bsNone;4、在From的FormMouseDown事件中增加以下语句：ReleaseCapture;SendMessage(Handle,WM_SYSCOMMAND,SC_MOVE+HTCaption,0);