社区
Delphi
帖子详情
如何画一个扇形,并可以填充颜色?(向扇形填充)
jintty
2003-06-02 10:26:30
RT,谢谢大家!
...全文
483
10
打赏
收藏
如何画一个扇形,并可以填充颜色?(向扇形填充)
RT,谢谢大家!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
10 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
jintty
2003-06-02
打赏
举报
回复
严重同意 propEdit
winder_008
2003-06-02
打赏
举报
回复
上面的可行。
bbs791109
2003-06-02
打赏
举报
回复
上面的可行。
lion_lh
2003-06-02
打赏
举报
回复
Delphi的Demo\propEdit下有个画扇形的控件
lion_lh
2003-06-02
打赏
举报
回复
procedure TForm1.Button1Click(Sender: TObject);
var
x, y : Integer;
angle : Double;
i : Integer;
begin
angle := 60/90*pi/2 / 160;
Canvas.Brush.Color := clRed;
Canvas.Pie(-512, -512, 512, 512, Round(512 * cos(angle * 160)),
Round(512 * sin(angle * 160)), 0, 0);
for i := 1 to 160 do
begin
y := Round(512 * sin(angle * i));
x := Round(512 * cos(angle * i));
Canvas.MoveTo(0, 0);
Canvas.LineTo(x, y);
end;
end;
citytramper
2003-06-02
打赏
举报
回复
例子我也没有
我跟你简单说一下吧,rgn是一种区域,CreateEllipticRgn创建椭圆区域,CreatePolygonRgn创建多边形区域,CreateRoundRectRgn创建矩形的内切圆或椭圆
CombineRgn 可以对两个区域进行 并,与,减等操作
FillRgn可以在区域里填充颜色
你可以先建一个圆rgn1通过CombineRgn把它割去一块rgn2,然后建一个三角rgn3,在把rgn3和rgn2合并起来就一个扇形,再用fillrgn填上颜色就可以了
Forllx
2003-06-02
打赏
举报
回复
Maybe Can use Canvas.Pie
jintty
2003-06-02
打赏
举报
回复
晕,能不能给例子?
citytramper
2003-06-02
打赏
举报
回复
HRGN你知道吗?
个你些api函数,通过这些东西就可以
CombineRgn
CreateEllipticRgn
CreateEllipticRgnIndirect
CreatePolygonRgn
CreatePolyPolygonRgn
CreateRectRgn
CreateRectRgnIndirect
CreateRoundRectRgn
EqualRgn
ExtCreateRegion
FillRgn
FrameRgn
GetPolyFillMode
GetRegionData
GetRgnBox
InvertRgn
OffsetRgn
PaintRgn
PtInRegion
RectInRegion
SetPolyFillMode
jintty
2003-06-02
打赏
举报
回复
??
VB使用Circle方法
画
弧和
扇形
.rar
VB使用Circle方法
画
弧和
扇形
,VB6.0
画
图形,几何图形。 Const pi = 3.14159 '常量声明 Private Sub Form_Click() ForeColor = vbRed '设置窗体前景色 DrawWidth = 1 '设置线宽 FillStyle = 0 '设置
填充
样式 FillColor = vbCyan '
填充
颜色
Circle (1500, 1500), 1000, , -1 / 4 * pi, -pi '
画
扇形
Circle (2000, 500), 1000, , 3 / 2 * pi, 2 * pi '
画
弧 fillsyle = 1 Circle (4000, 1000), 500, , -pi / 6, -pi / 3 '
画
六分之一小
扇形
Circle (3850, 1150), 500, , -pi / 3, -pi / 6 '
画
六分之五大
扇形
C#实现
填充
矩形 随机
画
矩形 鼠标绘图 色彩变换矩阵 全局变形图形 漂亮的C#登录窗口(动
画
效果) 路径 另存为 绘制
颜色
渐变图形 绘制线条 绘制椭圆 绘制
扇形
绘制抛物线 绘制矩形 绘制弧线 绘制多边形和折线 绘制RectangleF结构指定的矩形
画
直线
画
笔 创建笔 呈现图像 “字体”对话框安徽机电职业技术学院陈伟
填充
矩形 随机
画
矩形 鼠标绘图 色彩变换矩阵 全局变形图形 漂亮的C#登录窗口(动
画
效果) 路径 另存为 绘制
颜色
渐变图形 绘制线条 绘制椭圆 绘制
扇形
绘制抛物线 绘制矩形 绘制弧线 绘制多边形和折线 绘制RectangleF结构指定的矩形
画
直线
画
笔 创建笔 呈现图像 “字体”对话框
VB绘制三角形并
填充
三角形(可用此方法绘制出任意多边形)
我们可以
填充
Shape控件,可以
填充
用Line和Circle绘制的矩形和圆形(椭圆,
扇形
等),但是怎么
填充
三角形和多边形呢?这是我找到的源码,理解后将注释改成了中文的,用API函数,很短,也很好理解,超实用。
浮云E绘图高级Demo_业务配置化_复合图元动态更新_电路原理图更新
浮云E绘图,支持状态配置化,适应多场景绘图,而不需要修改代码。请看工程源码。 浮云E绘图支持直线、多点线、矩形、椭圆、三角、
扇形
、文字、图片等图元的绘制,并支持灵活组合成复合模板图元。支持条线(
颜色
、粗细、虚实、端点)、区域(是否
填充
、
填充
颜色
)、文字(内容、字体类型、字号、字体
颜色
)等。 浮云E绘图支持复制、粘贴、撤销、重做;框选、组合;分层(置顶、上一层等);对齐(顶部对齐、居中对齐、左对齐等);支持
画
布、网格、自动吸附对齐、滚动和缩放等。 ;;线类型名:状态数N;状态0
颜色
值,线宽,虚实;状态1
颜色
值,线宽,虚实......状态N
颜色
值,线宽,虚实 ;;块类型名:状态数N;状态0是否
填充
,
填充
颜色
;状态1是否
填充
,
填充
颜色
......状态N是否
填充
,
填充
颜色
;;类型名称: 状态数;状态0线
颜色
,线宽度,线风格,
填充
颜色
;状态1线
颜色
,线宽度,线风格,
填充
颜色
......
PHP操作
画
布,检测图片中主要
颜色
,并
画
各种图形
PHP操作
画
布,检测图片中主要
颜色
,并
画
各种图形。矩形,
扇形
,椭圆,
填充
矩形,线条等等
Delphi
5,379
社区成员
262,722
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章