B bingming Unregistered / Unconfirmed GUEST, unregistred user! 2000-06-02 #1 请教各位大虾一个问题如何用哪个API生成一个非矩形窗体最好能给我参数 及使用方法。
T tanglu Unregistered / Unconfirmed GUEST, unregistred user! 2000-06-02 #2 procedure TForm1.FormCreate(Sender:TObject); var hRegion : THandle; begin hRegion := CreateEllipticRgn (0,-Height,Width,Height); SetWindowRgn(Handle,hRegion,True); //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ //这个API就可以。 end;
procedure TForm1.FormCreate(Sender:TObject); var hRegion : THandle; begin hRegion := CreateEllipticRgn (0,-Height,Width,Height); SetWindowRgn(Handle,hRegion,True); //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ //这个API就可以。 end;
W wjiachun Unregistered / Unconfirmed GUEST, unregistred user! 2000-06-02 #3 http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=235368 上面的例子能够变化成字体形状的窗体，呵呵，很有趣
S skyrabbit Unregistered / Unconfirmed GUEST, unregistred user! 2000-06-02 #4 主要是先生成一个不规则区域,然后赋给窗体的句柄即可. 详见: http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=235839 http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=204162
主要是先生成一个不规则区域,然后赋给窗体的句柄即可. 详见: http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=235839 http://www.gislab.ecnu.edu.cn/delphibbs/DispQ.asp?LID=204162
