先建立一个不规则区域HRGN,然后
SetWindowRgn(Application.Handle,HRGN)即可。
SetWindowRgn(Application.Handle,HRGN)即可。
解决方案 »
- 工序成本累加思路-成本核算系统-第三问
- delphi 怎么控制udp发送广播包
- delphi调用存储过程,返回值的问题?
- C写的dll文件调用问题
- 局域网内2台计算机或同台计算机不同进程间用什么方法传输数据最快,请高手指教!!
- 对dbf文件操作,同样的sql语句执行结果不一致,怪!
- 为什么这样的鼠标钩子只能对调用窗口有用?(附源码)
- 如何操作?
- 关于多线程的问题
- 关于如何提高查询速度的问题
- 请问哪里有Delphi多媒体编程的详细资料
- sqlserver中用case语句能否同时返回两个参数?aa,bb=case a>0 then (select vv,mm from table2 where id=123) else '','' end from table1
在Form1.creat事件中,加入如下代码:
form1.canvas.brush:=clear; form1.bordstyle:= none;//可能有点出入
你在窗体上用一image装载你要的任何画面,设置为透明!你就能得到任意窗体了,当然
你现在得到的还只是简单的窗体外型,要想移动窗体,那就要重载form的createparams方法!
2.CreateRoundRectRgn:建立圆角矩形区域
3.CreateEllipticRgn:建立圆形区域
4.CreatePolygonRgn:建立多边形区域
5.PtInRegion:判断鼠标位置是否位于某一区域内
6.CombineRgn:复合区域