我想要用canvas 來畫扇形,我只想到以下方法,這樣好像很笨.而且畫起來怪怪的..謝謝大大..
for i:=3 to s do // 在一個時鐘上畫, i 是 起始位置, s 是結束位置
begin
with image1.canvas do
begin
pen.Width := 5;//這個值也不知道要多少才可以畫到一個像樣的扇形
moveto(128,128);
x := 128 trunc((sin(i/60*2*pi))*110);// 時鐘有60 分鐘 i/60 來代表畫的位置
y := 128-trunc((cos(i/60*2*pi))*110);
lineto(x,y);
end;
end;

Ans: 有個 Chor(x1,y1, x2,y2, x3,y3, x4,y4) 函數, 以 (x1,y1) (x2,y2) 矩型畫圓或橢圓, 再以圓心與 (x3,y3) 畫直線之交點及圓心與 (x4,y4) 畫直線之交點畫弦成為一圓弧與弦構成之弧形.
再以白線將弦塗掉, 補圓心至弦兩端之黑線, 即構成扇形, 不知是否您想要的結果?

===================引 用 文 章===================
Ans: 有個 Chor(x1,y1, x2,y2, x3,y3, x4,y4) 函數, 以 (x1,y1) (x2,y2) 矩型畫圓或橢圓, 再以圓心與 (x3,y3) 畫直線之交點及圓心與 (x4,y4) 畫直線之交點畫弦成為一圓弧與弦構成之弧形.
再以白線將弦塗掉, 補圓心至弦兩端之黑線, 即構成扇形, 不知是否您想要的結果?

謝謝大大..我也找到另一個函數. pie ... 但不知道怎用.看了help也不懂.看了您這個.才知道.用法是一樣的謝謝