Delphi7学习(关于像控件数组一样的东西)

最新推荐文章于 2024-05-27 16:19:43 发布
最新推荐文章于 2024-05-27 16:19:43 发布
阅读量1.1k 收藏
点赞数
CC 4.0 BY-SA版权
文章标签： delphi
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.youkuaiyun.com/iciclewang/article/details/2100654
本文介绍了一种在编程中批量获取多个Edit控件值的方法，并通过findcomponent函数实现。当对应Edit控件不存在时，默认返回0。此技巧适用于需要快速处理一系列输入框值的场景。

摘要生成于 C知道 ，由 DeepSeek-R1 满血版支持， 前往体验 >

  for i :=1 to 10 do
  begin
    b[i-1]:=strtointdef(Tedit(findcomponent('edit'+inttostr(i))).text,0);
  end;
 

一次性给多个Edit赋值~``如果没有的话就是0

这个findcomponent一定要记下来

 

iciclewang
关注
Delphi7下面关于动态创建控件和释放的个人总结
迷路的指南针的专栏
01-04 9508
昨天，一个网友在动态创建控件时释放出了错。他的情况是，动态创建了N个Panel，然后双击Panel就释放掉该Panel。可问题就来了，一释放就出错。然后就一顿讨论。当然也有其他的高手给出了代码，可高手的代码用的是XE5写的。我和那位网友都是Delphi7。网上也有别的一些动态创建和释放控件的代码但是跟我这讲的不一样。现在就把我自己在这件事的一些所想写下来，为后面的一些人提示或者铺路。软件这玩意跟环
delphi控件使用
achs24540的博客
10-27 2725
Standard页 1- Tlistbox控件 重要属性items.* 举例，界面设计如下左，执行结果如下右： 代码为 procedure TForm1.Button1Click(Sender: TObject); begin edit1.Text := listbox1.Items.CommaText; edit2.Text := listbo...
DELPHI也可以实现控件数组，用定义数组变量实现控件数
zgqtxwd的专栏
04-30 881
<!--google_ad_client = "pub-2947489232296736";/* 728x15, 创建于 08-4-23MSDN */google_ad_slot = "3624277373";google_ad_width = 728;google_ad_height = 15;//--><script type="text/javascript"
用Delphi简单实现创建控件数组
撒哈拉之雨的悲伤
05-02 4097
privateprocedure EdtEnter(sender: TObject);procedure EdtExit(sender: TObject);end;procedure Tfrm.EdtEnter(sender: TObject);beginTEdit(sender).Color:=clInfoBk;//当EDIT获得焦点时的颜色end;procedure Tfr
DELPHI也可以实现控件数组，用定义数组变量实现控件数组
ninsen的专栏
10-13 1960
Delphi也可以实现控件数组，用定义数组变量实现控件数组　　小弟表达能力有限，此文章又是本人第一次发表文档，所以不周到之处请各位仁兄多多包涵。　　我们在使用Delphi时有时会发现一个问题，就是Delphi没有像VB或者VF等软件一样可以很方便的定义控件数组。小弟在编写一个多媒休演示光盘的时候因要用到很多Image控件，而且如果没有用控件数组的话将使程序写起来非常麻烦而且复杂化。所以想了
DELPHI也可以实现控件数组，用定义数组变量实现控件数组 (转)
ciya3282的博客
08-16 176
DELPHI也可以实现控件数组，用定义数组变量实现控件数组 (转)[@more@]Delphi也可以实现控件数组，用定义数组变量实现控件数组 　　小弟表达能力有限，此文章又是本人第一次发表文档，所以不周到之处请各位仁兄多多包涵...
控件数组
clice30145的专栏
08-06 486
1、获取控件数组乘员类型和名称 int li_count,li_i li_count = upperbound(This.Control[]) for li_i = 1 TO li_count  if This.Control[li_i].TypeOf() =Groupb
Delphi制作的三角形迷宫生成器
12-23
9）发布自定义控件前先准备一个包含 类 一样名称的 ICO 的 DCR 文件，好像只有 Delphi7 里的 Image Editor 可以制作，这个工具包括两个文件 ImageEdit.exe 和 ImageD32.dll 两个文件 7、好像前后陆续花了近两个...
Delphi 开发Android Service四种模式初探
最新发布
05-27 1810
本篇文章正经来说，其实算是我的学习履历，是我在不断的摸索过程中，总结的经验，不能算是一篇正经的学术文章。现在DELPHI的学习资料太少了，就算是有也都是基于老版本DELPHI，或VCL相关的内容，涉及FMX、Android编程就显得明显不足，我虽然也玩了几年的DELPHI，但说实话能力水平有限，下面的文章如果有错误的地方，也请同行的前辈们指点修正，先在此谢过。
Delphi7编码精通：官方手册中的关键技巧与实战演练
本文首先回顾了Delphi7的基础知识和编程环境，然后深入探讨了Delphi7在面向对象编程、异常处理、组件与表单设计方面的关键技巧。接着，文章解析了Delphi7的高级特性，包括泛型编程、多线程与并发处理以及数据库访问...
Delphi控件数组的简易实现
weixin_34376562的博客
08-05 337
Delphi中没有提供现成的控件数组，这使每一个由VB转型到DELPHI程序员都会不由自主的怀念VB中那无处不在的控件数组以及控件数组给我们带来的方便。那么DELPHI中是不是就没有办法使用控件数组了呢？办法是有的，在很多DELPHI的教材中都提到一个方法：TLISTSTRING；使用TLISTSTRING类控制容器中的控件以达到使用控件数组的目的；另外一种途径是由用户自己来开发带数组性质的VCL...
在Delphi中巧改窗体文件实现控件数组
wozengcong的专栏
12-18 1030
delphi 开发的应用中，每一个窗体都有一个对应的窗体文件（.dfm），用来记录该窗体的属性以及窗体上所有控件的属性，以便在窗体关闭后能准确地重新生成窗体。几乎所有的DELPHI参考书都没有提到过该文件的具体情况，偶尔提到，也都泛泛而谈，因为窗体文件是二进制文件，只有在DELPHI提供的编辑环境中才能看到它的本来面目，对其进行操作可能会出现不可预知的错误；而且在大多数情况下，确实没有修改的必要。
delphi 控件动态数组 array of TImage 的一个奇怪问题
qqww155的专栏
12-17 353
arrTImage: array of TImage; SetLength(arrTImage, imageCount+1); //分配空间需要比实际数量加1，不然释放的时候会报内存错误，非常奇怪，这是怎么回事呢？ for I := 0 to Length(arrTImage) - 1 do begin // aComponent := Self.FindComponent('image' + inttostr(I)); if arrTImage[I] <&g...
Delphi手动创建控件及拥有者和控制者的说明解析
zisongjia的博客
05-22 904
var   Fbutton2:Tbutton;//手动添加的两个button对象   Fbutton3:Tbutton; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin   Fbutton2 := Tbutton.Create(form1);  //创建对象
Delphi7通过VB6之COM对象调用PowerBASIC写的DLL功能
weixin_45707491的博客
08-10 314
Delphi7通过VB6之COM对象调用PowerBASIC写的DLL功能。标题挺长，其实目标很简单，就是在Delphi7中使用PowerBASIC的MKI/CVI, MKS/CVS, MKD/CVD，并顺便加入CRC16检验函数，再进行16进制高低字节调整，方便在VB6、Delphi、Lazarus等环境下利用Modbus协议传送指令和数据时，进行十进制数的浮点转换和数据接收校验。
Delphi ActionList详解
HzqGhost's Blog
12-23 3310
一个友好的用户界面,必须具有下拉菜单，弹出菜单，工具条和快捷键。同样一个功能，程序员可能要提供几种操作方式，如文本拷贝，菜单命令 &Copy,快捷键Ctrl+C,工具条上的拷贝按钮，都是程序员提供给用户的操作，可以大大方便了不同层次的用户。但是，多增加一种操作方式，就意味着增加响应事件的代码，还有，实现统一功能的多个操作必须一致，如剪切板上不为空的时候，菜单命令，快捷键，按钮，都是可以选择的Ena
Delphi中对控件批量赋值
记录日常技术经验
03-19 951
举个小例子，现在有15个编辑框，我想对它批量赋值，因为一个个赋值的话写代码非常麻烦。 procedure TForm1.bsSkinButton1Click(Sender: TObject); var i: integer; begin for i:= 7 to 21 do begin TbsSkinEdit(FindComponent('bsSkinEdit' + IntToStr(i))).Text := ''; end; end; ...
DELPHI 静态数组的定义方法
abin30的专栏
12-13 7299
静态数组的定义方法 //1. 标准方法：var MyArr: array[0..10] of Integer; //定义静态数组//2. 可以使用非0下标：var MyArr: array[9..10] of Integer; //不能提倡，这样不容易与系统函数沟通//3. 根据预定义类型来声明数组：type TMyArr = array[
Delphi7中文字体增强控件包UnDelphiX_D7发布
- **Delphi7中的控件库**：Delphi 7自带了一系列控件，分为标准控件、额外控件和第三方控件。标准控件涵盖文本框、按钮、列表框等，而额外控件则可能包括更复杂或特定领域的组件，如报表控件、打印控件等。 ### ...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

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

余额充值