Canvas 图形

最新推荐文章于 2020-08-27 17:21:08 发布

scan724

最新推荐文章于 2020-08-27 17:21:08 发布

阅读量620

点赞数

分类专栏： Perl Tk模块

本文链接：https://blog.csdn.net/zhaoyangjian724/article/details/43316329

版权

Perl Tk模块专栏收录该内容

43 篇文章 31 订阅 ¥39.90 ¥99.00

订阅专栏

这篇博客展示了如何利用Perl的Tk库创建Canvas图形，包括多边形、椭圆形和矩形。通过示例代码解释了不同图形的创建方法和选项设置，如填充颜色、轮廓样式等。

摘要由CSDN通过智能技术生成

The command $widget -> create type options is used to make different structures A few examples are given
below For more information read the manual
Example
#!/usr/local/bin/perl
use Tk;
# Main Window
my $mw = new MainWindow;
my $cns = $mw -> Canvas(-relief=>"sunken", -background=>"blue");
$cns -> create('polygon',5,100,50,5,150,5,200,100,5,100,
-joinstyle=>"bevel", -fill=>"red", -outline=>"white", -width=>5);
$cns -> create('oval',200,100,300,200, -fill=>"green");
$cns -> create('oval',100,150,300,100, -fill=>"white", -width=>0);
$cns -> create('rectangle',10,150,100,250, -dash=&g

了解本专栏