！急！急！急如何实现圆的转动效果，以下为我写的VB代码，能用DELPHI代码改写吗

Question

你的设想可以，FloodFill的关键是获得FloodPoint，你可以用极坐标的思想来实现：
外圈FloodPoint的坐标（八个）：
x:=（原点）origin.x+(5/6)*radius*cos(angel);
y:=origin.y-(5/6)*radius*cos(angel);
然后：
（你所说的API，相信VB也一样）：FloodFill(HDC，x，y，FillColor)；
angel:=angel+45;
中圈为1/2，angel减变换；内圈为1/6，angel加变换。

Answer 1

我切下了文件，若你想要delphi代码的话，请与我来信我会发往你信箱，我不想在这儿找贴子。