phi模拟实现控件数组分析.PDFVIP

赫●十 l 软件设计与开发 术篇一用一 Delphi模拟实现控件数组分析 张慧’邢培振 (1．中州大学信息工程学院 河南郑州 450044； 2．华北水利水电学院水利职业学院现代教育技术中心 河南郑州 450005) 摘要 ：利用窗体 的componentsI【】，ComponentCount；c0mp0nentIndex三个属性模拟实现控件的数组化 。 关键词 ：Delphi控件数组 Components[I】 中图分类号 ：TP311．52 文献标识码 ：A 文章编号：1007-9416(2012)01-0103—02 1、引言 forI：=0tocomponentCount-1do利‘用for循环判断某对 控件数组为使用共享公共功能的控件组提供了一种方便的方 象是否属于Tbutton类 式。例如，控件组可以用来显示相关数据，或者在单击时提供相关的 if(components[I]isTbutton) then 操作。控件数组处理多个控件统一事件上很方便此功能使得创建一 (component~I]asTbutton)．Caption：-lTButton’； 个能够响应由多个不同控件引发的事件的处理程序方法成为可能。 分析 ：For循环用于遍历当前窗体上所有属于TComponent类 使用控件数组可开发出一些小型游戏。控件数组的灵活使用能够大 的对象；if语句用于判断某个对象是否属于Tbutton类；如果条件成 大提高编程人员的编程效率 。Delphi未提供专门的控件数组，本文 立，则将该对象的Caption)~性修改为 TButton’。通过上述分析，不 主要讨论的是如何在Delphi中模拟实现控件数组。 ·难发现 ，这种方法有一定局限性，最明显的是设计人员并不知道 Components[I]到底代表哪一个控件 ，因此只能用遍历的方法进行 2、控件数组原理 筛选，这不仅影响了程序执行的效率，也带来编程上的繁琐问题。 标准的控件数组是由一组相同类型的控件组成。它们共用一个 要解决上述问题 ，就要用~UTComponent类的ComponentIndex 控件名，具有相同的属性，执行相似的操作，同时共享同样的事件过 属性。在delphi7．0中，Componentlndex属性表示当前窗体上属于 程。为区分控件数组中的各个元素，具有此功能的程序设计语言通 TComponent类 的某个对象在Componnets[I]数组中的下标并且该 常会把各元素的下标值传送给过程，过程从接收到的下标来区分不 属性是一个可读写属性；该属性的默认值是该组件的添加次序 (从 同的元素。 岍 始计数)，那么就可以利用这一属性在组件生成时将同类组件的 3、Delphi中控件数组的模拟实现 ComponentIndex属性设置为连续的自然数数列；比如 ：n，n+1， n+2，……，n+m；如果我们要修改窗体上的该类组件，只需要遍历 3．1Delphi模拟控件数组原理分析 ComPonents【I】数组的部分下标 (比如ComPonents[n】_．… · VB是具有的灵活的控件数组功能的典型程序设计语言，但在 Components[n+m】)就可以实现。从而提高