数据库

本类阅读TOP10

·SQL语句导入导出大全
·SQL Server日期计算
·SQL语句导入导出大全
·SQL to Excel 的应用
·Oracle中password file的作用及说明
·MS SQLServer OLEDB分布式事务无法启动的一般解决方案
·sqlserver2000数据库置疑的解决方法
·一个比较实用的大数据量分页存储过程
·如何在正运行 SQL Server 7.0 的服务器之间传输登录和密码
·SQL中两台服务器间使用连接服务器

分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
如何在PB下实现圆形的窗口

作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站

如何在PB下实现圆形的窗口

API调用,最近看了一些API的资料,收益挺大的,小竹....

首先在窗口定义下列局部外部函数(Local External Functions...)

FUNCTION ulong CreateEllipticRgn(ulong X1,ulong Y1,ulong X2,ulong Y2) LIBRARY "gdi32.dll"

FUNCTION ulong SetWindowRgn(ulong hWnd,ulong hRgn,boolean bRedraw) LIBRARY "user32.dll"

 

在窗口的open事件中加上:

long hrgn

long lres

 hrgn=createellipticrgn(20,20,400,400)//其中参数为左上到右下的坐标值,可修改。

lres=setwindowRgn(handle(this),hrgn,true)

//记得在窗口中放置一个按钮关闭窗口

//在窗口处放置一幅图片即可实现圆形的窗口了。

但不知如何实现任意多边形的窗口,哪位大虾可以指点一二?

查阅API函数手册中有如下函数定义,应该是用来定义多边形窗口的,但不知如何使用。

FUNCTION ulong CreateEllipticRgnIndirect(ref Rect lpRect) LIBRARY "gdi32.dll"




相关文章

相关软件