admin 管理员组文章数量: 1184232
2024年4月22日发(作者：c语言二级考试用什么软件)
维普资讯
第２３卷第１期
２００２年３月
淮北煤师院学报
Ｃｏｌｌｅｇｅ
Ｖｏ１．２３ Ｎｎ１
Ｍ丑Ｌ ２００２
Ｊｏｕｒｎａｌ ｏｆ Ｈｕａｉｂｅｉ Ｃｏａｌ Ｉｎｄｕｓｔｒｙ １ｌ朗ｃｈ∞
基于Ｄｅｌｐｈｉ的位图随机显示技术
岳成刚
推北煤炭师范学院计算机科学与技术系，安静准北２３５０００）
摘要：阐违了在Ｄｅｌｐｂ５环境下设计位图随机显示程序的算法思想，实现过程与步骤，设计过程中涉
及到的关键问题及其解决方法．
关键词：Ｄｅｌｐｈｉ；位图；像素；随机显示
分类号：ＴＰ３１２ 文献标识码：Ａ 文章编号：１０００—２２２７（２００２）０１—００２７—０３
ｌ 问题的提出
编写图形化界面的应用程序是现代程序设计的主流．而图形、图像、图标、图元等图形元
素是可视化程序设计的基本构件，因此掌握各种图形元素的结构及其显示技术是设计界面友
好应用程序的基础．常见的图形显示技术有从左到右、从右到左、从上到下、从下到上、从左上
到右下、从右下到左上、从左下到右上、从右上到左下、从正中到两边、从两边到正中，这些技术
的实现较为简单，只要完成从既定方向扫描整个图形平面即可；而要实现诸如百叶窗式、淡人
淡出式、随机式显示，则较为复杂，因为此类图形显示无明确的规律．本文以位图的随机显示
为例，解决了此类图形显示中涉及的两个主要问题：一是避免显示重复像素；二是确定所有像
素均已显示完毕的条件
２实现环境及算法思想
本程序在Ｗｉｎｄｏｗｓ９８操作系统下面的快速编程工具Ｄｅｌｐｈｉ５中得到实现，Ｄｅｌｐｈｉ５是一个
面向对象的可视化编程工具，其提供了大量的可视化控件模板供用户使用，极大方便了用户开
发Ｗｉｎｄｏｗｓ应用程序．在Ｄｅｌｐｈｉ５中，有一组专门的对象和控件用来绘制图形，完成一些简单
的图像处理功能．例如在设计阶段用Ｔｓｈａｐｅ对象绘基本图形，在运行阶段用Ｔｉｍａｇｅ对象装
入图像文件．本程序用到其中的Ｔｃａｎｖａｓ、Ｔｂｉｔｍａｐ对象，算法思想是创建一个位图对象、从外
存装人一幅位图 然后随机地从位图对象中取像素画到窗体上，直到所有像素有且只有一次被
取出并画到窗体上为止，从而实现了位图在窗体上的随机显示．
３实现过程与步骤
（１）启动Ｄｅｌｐｈｉ５开始一个新项目：
（２Ｊ向窗体添加一个打开图形文件对话框，该对话框模板在控件面板中ＤＩＡＬＯＧＳ页的
第三个位置；
（３）选中对象观察器窗口，在下拉式列表框中选择Ｆｏｒｍｌ，点击Ｐｒｏｐｅｒｔｉｅｓ页，修改Ｆｏｒｍｌ
窗体对象的ＷｉｎｄｏｗＳｔａｔｅ属性为ｗｓＭａｘｉｍｉｚｅｄ；此举可避免在显示大幅图像时被自动截断；
（４）点击ＦｏｉｍＩ的Ｅｖｅｎｔｓ页．双击ＯｎＡｃｔｉｖａｔｅ事件的空白域，添加如下代码：
收稿日期：２００Ｉ一０６—０５
作者简介：岳成刚ｆ１９７４一 ），男．湖北武穴人，学士．助救
维普资讯
２８ 淮北煤师院学报 ２００２年
ｙＰｅ ａ ａｒｒａｙ ｕｆ ａｒｒａｙ ｏｆ ０．１： ／／定义一个动态二维数组类型
ｐｒｏｃｅｄｕｒｅ Ｔｆｏｒｍｌ ＦｏｒｍＡｅｔｉｖａｔｅ（Ｓｅｎｄｅｒ：Ｔｏｂｊｅｃｔ）；
ｖａｒ ｂｉｔｍａｐ：Ｔｂｉｔａｌａｐ；／／声明一个Ｔｂｉｔｍｄｐ类的实例ｂｉｔｍａｐ
ｘ，ｖ，Ｉ ｉｎｔｅｇｅｒ； ／／ｘ，ｙ是任何一个像索的磺、纵坐标；Ｉ是一个计数器．用来测试位图是否显示完毕
ｂ 帅；／／定义一个动态二维数组类型变量标记位图中各类像累的访问情况
ｂｅｇｉｎ
Ｉ＝Ｏ：／／初始化计数器
Ｒａｎｄｏｍｉ ／／初始化随机数发生器
Ｂｌｔｎｍ口： Ｔｂｉｔ ｐ ｃｒｅａｔｅ；／／动态创建一个位圈对象，接收一幅位图的所有像累
Ｉｆ ｅｐｅｎｐｉｃｔｕｒｅｄｉａｌｏｇ ｅｘ￣ｕｔｅ ｔｈｅｎ
Ｂｅｇｉｒ ｔ
Ｂｉｔｍａｐ．ＬｏａｄＦｒｏｍＦｉｌｅ（ｔｑＪｅｎｐｉｅｒｕｒ ｄｉａｌｏｇ１．ｆｉｌｅｔｒａｍｅ）；／／接收一幅位图
Ｓｅｔｌｅｎｇｔｈ（ｂｉｔ．ｂｉｔｍａｐ Ｗｉｄｔｈ ｈｉｔｍａｐ．Ｈｅｉｇｈｔ）；／／确定动态数组大小
Ｆｏｒ ０ ｔｏ ｂｉｔｍａｐ ｗｉｄ｛ｈ一１ ｄｏ
Ｆｏｒ一
Ｒｅｐｅａｔ
０ ｔｏ ｂｉｔｍａｐ ｈｅｉｇｈｔ～１ ｄ
Ｂ－ｔ【ｘＩ【ｖ１：＝Ｏ：／／初始化动悉数组
ｘ＝ｒａｎｄｕｍ（ｂｉｔｍａｐ ｗｉｄｔｈ）：
Ｙ
Ｔｒ
ｎｄｏｍ（ｈｉｔｍＩ１Ｕ ｈｅｉｇｈｔ）；／／随机产生位图中一像紊的横、纵坐标
【ｘ］【ＹＩ＿０ ｔｈ ｎ／／若该点来访问，
Ｂｅｇｉｎ
Ｂｉｔ【ｘｌｌＹ］＝Ｉ；／／刚加一个访问标记（即置１）
Ｉｎｃ（ｉ）；
Ｆ ｌ１１】．㈣
Ｕｎｔｉｌ １＝ｂｉｌｍａｐ Ｗｉｄｔｈ－ｚ－ｈｉｌｍａｐ Ｈｅｉｇ ｈｔ；
／，记数器加１．Ｉ值为已访问的像素数
Ｐｉｘｅｌｓ［ｘ，Ｙ１：＝ｂｉｔｍａｐ．ｃ ｓ Ｐｉｘｅｌｓ『ｘ，Ｙ］：
Ｅｎｄ；／／将得到的随机像素画到窗体
Ｅｎｄ；／／直到已画到窗体上的像素数与饕Ａ的位图文件像素总数相等为止
Ｅｎｄ；
（５）保存项目文件和单元文件，点击Ｐｏｌ￣ｉｅｃｔ菜单的Ｂｕｉｌｄ Ａｌｌ Ｐｒｏｊｅｃｔｓ选项，生成对应的可
执行程序．
４两个问题及其解决方法
４．１ 如何避免显示重复像素问题
因为是随机取像素，所以像素重复是不可避免的．解决这个问题的关键是将新生成的重
复像素屏蔽掉．本程序的解决方法是开辟一个动态二维数组，用以记录位图中各像素的访问
情况．该动态二维数组的大小随装人位图的犬小而定，行数为位图的宽度，列数为位图的高
度：任一个数组元素不是０就是１，０表示未访问，１表示已访问ｉ该数组所有元素初始化为０，
以后每访问一点，则将表示该点（某行某列１的二维数组元素置为１；下面每生成一个新的坐
标，就取出二维数组对应的元素进行分析，凡是已画过的点（该行该列的二维数组元素为１）就
不再画了，于是解决了画重复像素的问题
４＿２如何确定所有像素均已访问的问题
随机取出位图中的像素画到窗体上，那么何时画完呢？我们知道一幅位图的大小总是有限
的，即其总数是一定的；因此我们可 设计一个计数器，将该计数器初始化为０，每向窗体上画
个点，就将计数器加１，又由于４．１解决 重复画像索的问题，保证了位图中每个像素在窗
一
（下转第３９页１
维普资讯
第２３卷第１期
２００２年３月
淮北煤师院
．
学报
１ ２３—０．１
ｅｇｅ
Ｊｏｕｒｎａｌ ｏｆ Ｈｕａｉｂｅｉ Ｃｏａｌ Ｉｎｄｕｓｔｒｙ
Ｔｅａｃｈｅｒｓ Ｃｏｌｌ
Ｍａｒ．２０ｏ２
一
Ｆｅ ０。纳米薄膜的超声喷雾热解制备及其表征
袁洪春，刘强春，王 巍，王声乐
ｆ淮北煤炭师范学院物理系，淮北２３５０００）
摘要．采用超声喷雾热解制备技术在Ｓｉ（ＩＩＩ）基片上制备了ｎ一 ∞ 纳米薄膜选用０ ０ｌ ｍ￣ｌ／Ｌ的
Ｆ （口ｃｎｃ Ｊ 乙醇／水（１：１】混台液作为前驱液，在衬底温度３８０℃及载气流量６ Ｌ／ｒａｉｎ条件下．制备出
平均粘径为４ １¨１、具有（１０４）择优取向的纳米薄膜，并通过ＸＲＤ，ＡＦＭ等对其微观结构进行了表
征
关键词：氧化铁：喷雾热解；薄膜
中图分类号ＴＢ３８３ 文献标识码：Ａ 文章编号：１０００—２２２７（２００２）０１—００２９—０３
１ 引言
近年来，薄膜气敏材料正受到世界各国相关学者及行业的极大重视 ．薄膜型气敏材料特
别适宜于制备检测易燃、易爆的多功能、智能型传感器至今，关于 —ＦｅｚＯ 纳米薄膜气敏材
料制备及性质研究还是很少的．纳米薄膜是实现气体传感器微型化、智能化、集成化以及多功
能化的重要途径之一，乜是气体传感器发展的新方向．本文所采用的超声喷雾热解技术具有多
组分、组分含量易控制、不易引人杂质、一次成膜、无须后处理、颗粒小且均匀等优点；此外，此
技术的另一重要特点是设备简单、低成本、源物质易获得、无须任何真空体系、适宜太面积制
膜，可在较低的温度下淀积在此，作者改进自制了一种简易的超声喷雾热解技术，并在ｓｉ
（ＩＩＩ）基片上成功的生长了 —Ｆｅ：Ｏ 纳米薄膜，并对其微观机制进行了研究探讨．
２ 实验
２．１实验装置及流程
选用０ ０１ ｍｏｌ／Ｌ Ｆｅ（ａｃａｃ） 的乙醇／去离子水（１：１）混合溶液作为前驱液，以空气为载
气，峨雾之前，前驱液先在５０℃环境的超声波清洗器里预处理３０ ｒａｉｎ基片处理过程及顺序
如下 ：Ｈ Ｏ ：ＮＨ ＯＨ：Ｈ２Ｏ（１：ｌ：５），ＨＦ／Ｈ２Ｏ（１：５０），Ｈ：Ｏ２：ＨＣｈＨ２０（１：１：６），去离子水反复冲
洗后，放人超声波清洗器里再清洗３Ｏ ｍｉｎ左右．
殴计的反应装置原理图见图ｌ，特点是用压缩空气代替了氧气为载气，用倾角为６０度的
石英三角架代替旋转装置，制备的薄膜无须退火且具有一定的取向，牢度好．反应前驱液经家
用超声雾化器进行雾化，然后用压缩空气将雾化后的反应气体压人到反应炉内，喷到热的基片
上，形成纳米蒲膜压缩空气流量４—９ Ｌ／ｒａｉｎ，每喷射１０ ｓ间歇１０ ｓ，总时间ｌ５—３０ｍｉｎ，基
片温度在２００—５４０℃之间，喷嘴到基片距离６．０—８．５ ｃｍ．所得薄膜呈均匀明亮的兰色．
２．２主要仪器设备
ｘ射线衍射仪（ｘ—ｒａｙ ｄｉｆｆｒａｃｔｉｏｎ，ＸＲＤ，Ｒｉｇａｋｕ Ｄ／ＭＡＸ一 ＾）；原子力显微镜（Ａｔｏｍｉｃ
收稿日期：２００ Ｊ一０３—２２
怍者简介索洪春（１９７６一）．男，江苏盐城＾ 助教．主要从事理论物理教学耐ｆ究
维普资讯
第１期 蔡香民锰氧化物的结构 ３９
【６］Ｓｏｌｏｖｙｅｖ Ｉ，Ｈａｍａｄａ Ｎ，Ｔｅｒａｋ￣ａ Ｋ．Ｃｒｕｃｉａｌ ｒｏｌｅ，ｏｆ ｔｈｅ ｌａｔｔｉｃｅ ｄｉｓｔｏｒｔｉｏｎ ｉｎ ｔｈｅ ｍａｇｎｅｔｉｓｍ ０ｆ ＬａＭｎ０３［Ｊ］．脚Ｂ
Ｒｅｖ Ｌｅｔｔ，１９９６，７６：４ ８２５
Ｉ７］Ｓａｔｐａｔｈｙ Ｓ，Ｐｏｐｏｖｉｃ ｚ Ｓ，Ｖｕｋａｊｌｏｖｉｃ Ｆ Ｒ Ｅ］￣ｔｍｍｃ ｓｔｒｕｃｔｕｒｅ ｏｆ ｔｈｅ ｐｅｒｏｖｓｋｉｔｅ ｏｘｉｄｅｓ：Ｌａ Ｃａ—ＭｎＯｊ［Ｊ］．Ｐｈｙｓ
Ｒｅｖ Ｌｅｔｔ．１９９６．７６：９６０．
［８】Ｐｉｃｋｅｔｔ Ｗ Ｅ，Ｓｉ Ｄ Ｊ．Ｅｌｅｃｔｒｏｎｉｃ ｓｔｕｃｔｒｕｒｅ ａｎｄ Ｈａｌｆ—ｍｅｔａｌｌｉｃ ｔｒａｎｓＤｏｔｔ ｉｎ ｔｈｅ Ｉ丑 Ｃａ。ＭｎＯＪ ｓｙｓｔｅｍ［Ｊ］Ｐ Ｂ
Ｒｅｖ Ｂ．１９９６．５３：１】４６
Ｓｔｒｕｃｔｕｒｅ ｏｆ Ｍａｎｇａｎｅｓｅ ０嫡ｄｅ
ＣＡＩ Ｘｉａｎｇ—ｍｉｎ
｛Ｈ￣ｉｂｅｌ Ｔｅｃｈｎｉｃａｌ Ｃｏｌｌｅｇｅ如ｒ Ｐｍｆｅｓｓｌｏｕ．Ｈｔｔａｌｂｅｌ ２３５０００】
Ａｂｓｔｒａｃｔ：ｔｅ ｓｕｐｅｒ—ｃｏｌｈｏｓｓａｌ ｍａｇｎｅｔｉｃ ｒｅｓｉｓｔａｎｃｅ ｅｆｆｅｃｔ ｗｈｉｃｈ ｔｈｅ ｍａｎｇａｎｅｓｅ ｏｘｉｄｅ ｈａｓ ｆｉｎｄｓ ｉｔｓ
ｇｒｅａｔ ｐｏｔｅｎｔｉａｌ ａｐｐｌｉｃａｔｉｏｎ ｉｎ ｔｈｅ ｆｉｅｌｄｓ ｏｆ ｍａｎｇｎｅｔｉｅ ｓｔｏｒａｇｅ ａｎｄ ｓｅｎｓｉｎｇ．Ｔｈｅｒｅｆｏｒｅ，ｔｈｅ ｍａｎｇａｎｅｓｅ
ｏｘｉｄｅ ｈａｓ ｒｅｓｕｌｔｅｄ ｉｎ ｍｕｃｈ ｉｎｔｅｒｅｓｔ ｏｆ ｍａｎｙ ｓｃｉｅｎｔｉｉｃ ｒｅｓｅａｒｆｃｈｅｒｓ ｂｅｃａｕｓｅ ａ ｌｏｔ ｏｆ ｐｈｙｓｉｃａｌ ｐｈｅ—
ｎｏｍｅＤａ ａｎｄ ｐｒｏｂｌｅｍｓ ａｒｅ ｉｍｐｌｉｃａｔｅｄ ｉｎ ｓｕｃｈ ｍａｎｇａｎｅｓｅ ｏｘｉｄｅ ａｓ ｅａ￣ｉｕｍ—ｔｉｔａｎｉｕｍ ｔｙｐｅ．Ｉｔ ｉｓ ｅｒｉｔ—
ｉｃａｌ ｔｏ ｌｅａｒｎ ａｂｏｕｔ ｔｈｅ ｓｔｒｕｃｔｕｒａｌ ｆｅａｔｕｒｅ ｏｆ ｔｈｅ ｍａｎｇａｎｅｓｅ ｏｘｉｄｅ ｉｎ ｄｉｓｃｕｓｓｉｎｇ ｉｔｓ ｐｈｙｓｉｃａｌ ｐｒｏｐｅｒｔｙ．
Ｋｅｙ ｗｏｒｄｓ：Ｊａｈｎ—Ｔｅｌｌｅｒ ｄｉｓｔｏｒｔｉｏｎ；ｃａｌｃｉｕｍ—ｔｉｔａｎｉｕｍ ｍｉｎｅｒａｌ ｓｔｒｕｃｔｕｒｅ；ｃｒｙｓｔａｌ；ｓｉｍｐｌｉｉｅｄ ｆ
ＣＯＩ１］ｂｉｎａｔｉｏｎ；ｓｙｍｍｅｔＤ＇
（上接第２８页）
体上只画一次，因此当计数器的值等于位图的像素总数时，该位图在窗体上就已显示完毕；而
位图的总像素是很容易确定的，为位图的高度乘以位图的宽度．于是解决了确定所有像素均
已显示完毕的条件的问题．
参考文献：
［１］［ｂ￣］Ｍａｒｃ＇ｏ Ｃａｎｔｕ著
［３］王华等编著
王辉等译Ｄｅｌｐｈｉ ４从＾门到精通［Ｍ］北京：电子工业出版社．１ ９９９
［２１昊云波，门槛创作室编著．Ｄｅｌｐｈｉ ４．０编实用教程【Ｍ】北京：中国水利水电出版社．１９９９．
Ｄｅｌｐｈｉ ５编程实例与技巧［Ｍ１北京：机械工业出版社，１９９９．
［４】姚庭宝Ｄｅｌｐｈｉ ２ ０高级程序设计指南［Ｍ】北京：电子工业出版社１９９６．
Ｔｈｅ Ｒａｎｄｏｍ Ｄｉｓｐｌａｙ Ｔｅｃｈｎｏｌｏｇｙ ｏｆ ａ Ｂｉｔｍａｐ ｉｎ Ｄｅｌｐｈｉ
ＹＵＥ Ｃｈｅｎｇ—ｇａｎｇ
Ｄｅｐａｚｔｍｅｎｔ ｏｆ ＣｏｍｐｎＺｅｒ Ｓｃｉｅｎｃｅ ｅｎｄ Ｔ￣ｈｎｄｏｇｙ，Ｈｕａ￣ｅｉ Ｃｏａｌ ｄ ｃ Ｔｔａｃｈｅｒｓ Ｃｄｌｅｇｅ．Ｈｕａｌｂｅｌ ２３５０００）
Ａｂｓｔｒａｃｔ：Ｔｈｉｓ ｐａｐｅｒ ｅｘｐａｔｉａｔｅｓ ｔｈｅ ａｌｇｏｒｉｔｈｍ ｏｆ ｄｅｓｉｇｎｉｎｇ ａ ｂｉｔｍａｐ ｒａｎｄｏｍ ｄｉｓｐｌａｙ ｐｒｏｇｒａｍ ｉｎ
Ｄｅｌｐｈｉ ｒａｐｉｄ ａｐｐｌｉｃａｔｉｏｎ ｄｅｖｅｌｏｐｍｅｎｔ ｅｎｖｉｒｏｎｍｅｎｔ．ｍａｄ ｔｗｏ ｐｉｖｏｔａｌ ｐｒｏｂｌｅｍｓ ａｎｄ ｔｈｅｉｒ ｓｏｌｕｔｉｏｎ ａｒｅ
ｄｉｓｃｕｓｓｅｄ．
Ｋｅｙ ｗｏｒｄｓ：ｄｅｌｐｈｉ；ｂｉｔｍａｐ；ｐｉｘｅｌ；ｒａｎｄｏｍ ｄｉｓｐｌａｙ
版权声明：本文标题：基于Delphi的位置随机显示技术 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://roclinux.cn/p/1713769814a650704.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。
发表评论