- 关 键 词：
- delphi
本实例演示如何不用添加代码就可轻松浏览大图像。当图像的尺寸大于显示区的大小时，就会自动显示滚动条，拖动这些滚动条就可以浏览显示区以外的图像。
在窗体中添加一个TScrollBox组件，设置AutoScroll属性为True。然后在TScrollBox组件上添加一个TImage组件，设置Align属性为alNone，AutoSize属性为True，并且为TImage组件加载一幅大图像。
经过以上的设置，TImage组件就会根据图像的大小自动调节尺寸。与此同时，TScrollBox组件就会自动设置滚动条以方便浏览大图像。
需要注意的是，TImage组件是添加到TScrollBox组件上，而不是窗体上。添加方法是：首先选中TScrollBox组件，然后在组件工具栏中双击要添加的组件，这样就会把组件添加到TScrollBox组件上。设计完成的窗体如图1所示。
 图1 设计完成的窗体 |
保存文件，然后按F9键运行程序，程序运行的初始画面如图2所示。
在程序运行的过程中，可以通过拖动鼠标实时地改变窗体上3个部分的大小，如图3所示。
 图2 程序运行的初始画面  图3 程序运行结果 |
本实例充分利用了Delphi中TScrollBox和TImage组件的特性，读者可以通过完善这个实例来自己制作一个图像浏览器。打开： http://www.qqread.com/delphi/q040103002.html
更多内容请看Java编程开发手册、Delphi图形图像编程专题，或进入讨论组讨论。
相关图文阅读
频道图文推荐
健 康 咨 询
时 尚 咨 询
相关专题
- Java编程开发手册 (8276篇文章)
- Delphi图形图像编程 (18篇文章)
- 熊猫烧香核心源码(Delphi模仿版-仅供学习 (11349次浏览)
- 用Delphi开发视频聊天软件 (4953次浏览)
- Delphi控制Excel自动生成报表 (4001次浏览)
- 动态语言崛起 Delphi For PHP能否挽救Borla (2976次浏览)
- Delphi 中串口通讯的实现 (2889次浏览)
- 用Delphi + DirectX开发简单RPG游戏 (2551次浏览)
- 用Delphi和Web Services开发短信应用程序 (2043次浏览)
- 使用TCP/IP协议实现聊天程序 (1827次浏览)
- 用DELPHI实现文件加密压缩 (1721次浏览)
- 利用Delphi编程控制摄像头 (1391次浏览)
