通行证│用户名: 密码: 验证码: 验证码,看不清楚?请点击刷新验证码 电信网通铁通移动   在线
资源搜索:
热门搜索:Linux VB C语言 PhotoShop Flash TCP/IP
   首页 | 文章 | 软件 | 动画 | 资源 | 励志 | 骗术 | 论坛 | 邮箱 | 会员中心 | 军事 | 科技 | 博客 | 图片 | 商城 | 最新更新 | 800g资源 | 爱心黑客
您现在的位置: 爱国者黑客 >> 资源 >> 程序设计 >> Delphi语言 >> 编程技巧 >> 文章正文
Delphi编程轻松实现大图像浏览
责任编辑:ncic   更新日期:2007-4-3

  本实例演示如何不用添加代码就可轻松浏览大图像。当图像的尺寸大于显示区的大小时,就会自动显示滚动条,拖动这些滚动条就可以浏览显示区以外的图像。

  在窗体中添加一个TScrollBox组件,设置AutoScroll属性为True。然后在TScrollBox组件上添加一个TImage组件,设置Align属性为alNone,AutoSize属性为True,并且为TImage组件加载一幅大图像。

  经过以上的设置,TImage组件就会根据图像的大小自动调节尺寸。与此同时,TScrollBox组件就会自动设置滚动条以方便浏览大图像。

  需要注意的是,TImage组件是添加到TScrollBox组件上,而不是窗体上。添加方法是:首先选中TScrollBox组件,然后在组件工具栏中双击要添加的组件,这样就会把组件添加到TScrollBox组件上。设计完成的窗体如图1所示。

  图1 设计完成的窗体

  保存文件,然后按F9键运行程序,程序运行的初始画面如图2所示。

  在程序运行的过程中,可以通过拖动鼠标实时地改变窗体上3个部分的大小,如图3所示。

  

  图2 程序运行的初始画面

  图3 程序运行结果

  • 上一篇文章:
  • 下一篇文章:
  • 热门文章
    Olldbg常见问题
    汇编语言的艺术(组合语言的艺术)--观
    汇编语言的艺术(组合语言的艺术)--准
    汇编语言的艺术(组合语言的艺术)--基
    汇编语言的艺术(组合语言的艺术)--基
    汇编语言---程式设计 (4)
    虚拟8086模式
    SYS命令使用说明
    javascript + CSS 实现动态菜单显
    推荐文章
    自制Windows XP SP2自动安装光盘
    SQLServer注入工具改进版 v1.02
    使用photoshop CS进行自然美肤
    Photoshop绘制诺基亚手机
    PHOTOSHOP制作秋日之梦
    PHOTOSHOP鼠绘名模王爱萍
    Photoshop制作晶莹飞溅的水珠
    教你用PHOTOSHOP做放大镜
    鼠绘美女及服装修画全过程