用Delphi实现程序永远置顶

貌似可以把Form的

formstyle属性设为StayOnTop，

把Form的ParantForm（ParantWindow我记不太清楚了是那个了，本机没装DELPHI）设为桌面。其句柄为

GetDC（0）

ParantForm：=GetDC（0）；

不值得我记得准不准，你可以试下。

1/6

打开微信app，点击下方“发现”，然后点击图示位置“小程序”。

2/6

然后在“小程序”中找到你所要的置顶的小程序，然后长按。

3/6

长按之后，在该小程序上方会d出一个框，显示“标为星标”和“删除”。

4/6

点击上图中的“标为星标”，即可将该小程序置顶到首位。

5/6

再次长按已经置顶的小程序，在小程序上方依旧会d出一个框“取消星标”和“删除”选项，点击“取消星标”，即可取消小程序置顶。

6/6

如果你不想要该小程序，你可以长按小程序，然后点击“删除”，将小程序删除，即可。

---