DELPHI中图像的显示效果

  所谓百叶窗效果,就是将画布分成若干个区域,各区域以
渐进方式同时复制图形,就象翻动的百叶窗一样.以下就是一
个显示特效的过程实例:
        首先,新建一个工程,在窗体上添加两个IMAGE控件,在控件
    IMAGE1的PICTURE属性中导入一幅位图(*.bmp),并将IMAGE1
    的VISIBLE属性设为FALSE。
        然后,在代码窗口中定义如下过程:
    procedure TForm1.fan;  
    var r1:Trect;
        list,r,every:integer;
    begin
    list:=1;
    every:=trunc(screen.Height/10)+1;
    While list<=every do
    begin
      for r:=0 to 10 do begin
       r1:=rect(0,r*every,screen.Width,R*every+list);
       image2.Canvas.CopyRect(r1,image1.Canvas,r1);
      end;
       update;
       Inc(list);
    end;
    end;
    以后就可以在程序中需要的地方调用了。
下面就让我们看一下这是如何实现的,代码中RECT(X1,Y1,X2,Y2)
表示选定的矩形范围,(X1,Y1)是矩形左上角坐标,(X2,Y2)是矩形
右下角坐标。图形显示由COPYRECT(R1,CANVAS,R2)完成,其中R1是
目标区域,R2是被复制区域,CANVAS是被复制对象(它也可以是一个
TBITMAP的实例)。
  • 0
    点赞
  • 0
    收藏
  • 打赏
    打赏
  • 0
    评论
作 者:郭振斌/黄业清 出 版 社: 出版日期:2000-09 ISBN:790003807 版 次:1 包 装:精装 开 本:16开 页 数:561页 本书通过100个实例全面讲述了应用Delphi进行高级界面编程思想。书每一章均以一个实例详细实践步骤为引子,介绍其实现详细技术内幕,并由此提出其他练习。全书详尽讲述了界面设计各个方面,包括:窗口界面、菜单、控件、工具栏、状态栏编程等。 全书面向实例进行阐述,讲解透彻,易于掌握。本书主要作为、高级计算机软件开发人员参考书,也可供初学者和高等院校学生使用。 目录 丛书前言 前言 读者须知 第1章 进入dephi 实例1 创建一个工程 实例2 制作mdi窗口 实例3 制作带排列子窗口菜单mdi窗口 第2章 word 97风格界面 实例4 制作word 97风格窗口 实例5 菜单上加入图像 实例6 在状态条上显示按钮功能 第3章 ie 5风格界面 实例7 制作be 5风格窗口 实例8 ie 5窗口菜单加入图像 实例9 按钮时效性 第4章 工程宙口尺寸 实例10 限制工程窗口大小 实例11 定义工程窗口大小 实例12 动态调整工程窗口大小 第5章 非规则宙口 实例13 生成圆角矩形窗口 实例14 生成椭圆形窗口 实例15 生成多边形窗口 第6章 宙口背景颜色 实例16 不同颜色背景窗口 实例17 渐进颜色窗口 实例18 窗口背景颜色变化 第7章 工程启动退出界面 实例19 工程运行启动画面 实例20 工程运行退出画面 实例21 工程启动退出画面 第8章 工程任务栏图标 实例22 工程生成任务栏图标 实例23 任务栏图标上鼠标消息 实例24 任务栏图标菜单操作 第9章 五彩构件 实例25 制作五彩菜单 实例26 完成五彩菜单 实例27 制作颜色下拉框 第10章 工具条按钮 实例28 制作带下拉菜单工具条按钮 实例29 工具条按钮分组 实例30 工具条按钮快捷菜单 第11章 动画按钮 实例31 制作带动画按钮 实例32 动画按钮加入文字 实例33 动画按钮加入菜单 第12章 状态条加入可视构件 实例34 在状态条加入进程条 实例35 在状态条加入图像 实例36 在状态条加入动画 第13章 状态条加入文字 实例37 在状态条上加滚动文字 实例38 状态条上文字滚动设计 实例39 改变状态条上文字格式 第14章 状态条上显示时间 实例40 在状态条上显示时间 实例41 状态条时间显示格式变化 实例42 状态条背景设计 第15章 工具条设计 实例43 在工具条上加入编辑 实例44 工具条和状态条联系 实例45 在工具条上加入日历 第16章 编辑框设计 实例4

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

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
©️2022 CSDN 皮肤主题:大白 设计师:CSDN官方博客 返回首页
评论

打赏作者

sweihua

你的鼓励将是我创作的最大动力

¥2 ¥4 ¥6 ¥10 ¥20
输入1-500的整数
余额支付 (余额:-- )
扫码支付
扫码支付:¥2
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

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

余额充值