Graphic Form
关注
分享
扫一扫
网上邻居1
11111111111
展开
-
用Delphi画圆角Panel的方法
用Delphi画圆角Panel的方法procedure TForm1.Button5Click(Sender: TObject);var fhr :Thandle;beginfhr:=createroundrectrgn(0,0,panel1.width,panel1.height,4,4);setwindowrgn(panel1.handle,fhr,tr转载 2013-04-16 10:07:00 · 660 阅读 · 0 评论 -
Delphi中绘制圆角矩形的窗体
制作圆角矩形的窗体：01.procedure TPortForm.FormCreate(Sender: Tobject);02.var hr :thandle;03.begin04.hr:=createroundrectrgn(0,0,width,height,20,20);05.setwindowrgn(handle,hr,true); 06.end;如果不要窗体转载 2013-04-16 10:05:41 · 595 阅读 · 0 评论