Delphi编写图形图象的设计

Delphi编写图形图象的设计
2012年01月11日
  .图形图像
  1. 图象控件IMAGE
  图象控件TIMAGE是一种容器控件,它在应用程序窗体上提供一个矩形区域,用于显示各种位图.图标.图元文件.
  它在ADDITIONAL页上.
  给IMAGE加图有两种方法:
  1) 在FORM1中添加IMAGE控件.选定IMAGE控件,单击对象编辑器中的PICTURE属性三点按钮,打开图片对话框
  单击LOAD…选择图片
  2).通过调用过程.
  PROCEDURE LOADFROMFILE(CONST FILENAME:STRING);VIRTUAL;
  在程序运行期间调入图形.
  例: image1.picture.loadfromfile(‘c:\110.bmp’);
  重要属性有:
  autosize:当设置为(true)真时,图像框会随图形变大或缩小。
  Strech:拉伸属性,当设置为(true)真时,图像会随图像框而变大或缩小。
  2. 几何图形控件SHAPE
  几何图形控件位于工具栏上的ADDITIONAL页中,用于窗体上绘制一些常见的几何图形,如矩形.圆.椭圆.圆角矩形等.
  其中重要属性有:
  SHAPE属性:设置需要绘制的几何图形种类.有以下值:
  STCIRCLE圆
  STELLIPSE椭圆
  STRECTANGLE矩形
  BRUSH属性:设置图形填充的模式和颜色.其下有:
  COLOR.填充颜色
  STYLE:填充风格.
  例:变脸猪
  步骤:
  1) 在窗体上设计不同控件,其中有六个时间控件和六个SHAPE设计时间控件的INTERVAL,注意两个眼睛,与两个耳朵时间控件的间隔相同.
  750
  400
  Trunc 将实型值截取为整型值
  Randomize 用一随机数初始化内置的随机数生成器
  Random 返回一随机函数
  300
  200
  200
  400
  500
  1000
  procedure TForm1.Timer1Timer(Sender: TObject);
  var
  r,g,b:integer;
  begin
  randomize; //用一随机数初始化内置的随机数生成器
  r:=trunc(random(256)); //取得一个255以内的随机数并取整
  g:=trunc(random(256));
  b:=trunc(random(256));
  shape1.Brush.Color:=rgb(r,g,b);
  end;
  procedure TForm1.Timer2Timer(Sender: TObject);
  var
  r,g,b:integer;
  begin
  randomize; //用一随机数初始化内置的随机数生成器
  r:=trunc(random(256));
  g:=trunc(random(256));
  b:=trunc(random(256));
  shape2.Brush.Color:=rgb(r,g,b);
  end;
  其它同理.
  3.颜色常量.
  在DELPHI中除了可以使用RGB(R,G,B)颜色以外,还可以使用系统中给定的颜色常量.
  例:EDIT1.COLOR:=CLRED;
  颜色常量有:
  CLAQUA浅绿色.
  CLBLACK黑色.
  CLBLUE蓝色.
  CLDKGRAY灰黑色.
  CLFUCHSIA紫红色.
  CLGRAY灰色.
  CLGREEN绿色.
  CLLIME橙绿色.
  CLLTGRAY浅灰色.
  CLMAROON栗色.
  CLNAVY深蓝色.
  CLOLIVE深绿色.
  CLPURPLE紫色.
  CLRED红色.
  CLSILVER银色.
  CLTEAL水色.
  CLWHILE白色.
  CLYELLOW黄色.
  RGB(R,G,B)分别为RED,GREEN,BLUE取值范围为0~255
  创建图标文件.
  在WINDOWS中.图标文件有多种类型,在DELPHI中很多地方也需要用到图标.比如要改窗体标题栏上的图标等.
  我们可以选择WINDOWS系统中图标,也可以用DELPHI的工具自建图标.
  步骤1.开始à程序àBORLAND DELPHI7àIMAGE EDITOR
  单击”FILE”菜单àNEWà.RES
  .DCR
  .ICO
  .BMP
  .CURà选择其中一种类型
  在做图时与WINDWOS中画图一样.
  2.找到所在目录
  例如: C:\program files\delphi6\bin\imagedit.exe
  3. 单击DELPHI中”TOOL”菜单àIMAGE EDITOR.
  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值