BorderStyle=0无边框窗口没有窗口阴影，缺少层次感，BorderStyle=1也没有阴影，请教怎样才能有阴影呢？

谢谢！刚刚用API函数试了，GetClassLong ，SetClassLong ，但是只有左边和下边才有阴影。

boderstyle设置为0，titlebar=.f., 表单LOAD事件里加下面的代码，边框就是上面图片的样子。
DECLARE INTEGER SetClassLong IN user32 INTEGER nhandler, INTEGER GclStyle, INTEGER hSrcRgn2
DECLARE INTEGER GetClassLong IN user32 Integer nhandler, integer nindex
#define  CS_DropSHADOW  0x20000
#define GCL_STYLE  (-26)
SetClassLong(thisform.HWnd,GCL_STYLE  ,BITOR(GetClassLong(thisform.hwnd,GCL_STYLE  ),CS_DropSHADOW) )
这个API函数是我看https://ask.的帖子后改的，但是不了解声明中参数GCL_STYLE  和CS_DropSHADOW  的意思，是不是改下参数就可以四边都有阴影呢？
跪求大佬点拔

用分层窗口和透明效果可以做四边的阴影，效果还可以

用图片做皮肤？和阴影效果不一样吧

[此贴子已经被作者于2020-8-18 20:33编辑过]