Delphi Canvas生成万花筒特效.rar

时间:2022-07-30 11:22:06
【文件属性】:

文件名称:Delphi Canvas生成万花筒特效.rar

文件大小:7KB

文件格式:RAR

更新时间:2022-07-30 11:22:06

Delphi源码-图形处理

Delphi Canvas生成万花筒特效,是由一个个单体的圆形经过变换生成的,单体的圆形的定义代码,可参考下边的代码:   Form1: TForm1;   R1,R2,Syn:integer; //R1大圆半径,R2小圆半径;Syn为小圆上的任意一点到圆心距离   Xr,Yr,W,H:integer;   //Xr,Yr为小圆上一点座标,W,H大圆圆心座标   a1,a2:Real;//a1定义为大圆角度,a2定义为小圆角度   pi : real=3.1415926;   复制圆然后旋转。


【文件预览】:
codesc.net
----Delphi Canvas生成万花筒特效()
--------Project1.res(876B)
--------Unit1.dfm(470B)
--------Unit1.ddp(51B)
--------Project1.cfg(434B)
--------Unit1.pas(1KB)
--------Project1.dpr(188B)
--------Project1.dof(2KB)
--------Unit1.dcu(5KB)

网友评论