在可视化开发的时代,窗体是绝大部分应用程序的核心,但是开发者也许已对Windows一成不变的方形窗体感到厌烦。其实巧妙地使用API函数即可实现汉字形状的窗体。 本文的实例运行后将显示一个由电脑报三个汉字作为外形的窗体。当然你还可以利用本期讲的方法实现更有个性的汉字窗口。
设计思路
1犑褂肂eginPath和EndPath函数为窗体定义路径。
2犛肞athToRegion将路径转换为Region数据。
3牭饔肧etWindowRgn按路径绘制窗体。
4犛捎诓还嬖虼疤逦尴低巢说ィ因此程序中必须有关闭窗体的代码。
实现步骤
启动Delphi7,新建项目。前述的API函数在Delphi中均可直接调用,因此用户不需要声明,可直接输入下面的控件事件代码。
//窗体创建事件procedure TForm1.FormCreate烻ender TObject牔var rgn烪RGNbegin //设置文字颜色为红色 form1.Color=clred //开始设置路径,参考API函数声明① beginpath焎a...[ 查看全文 ]