有i个相同控件,如何指定到第i个
来源:互联网 发布:数据库系统工程师难吗 编辑:程序博客网 时间:2024/04/29 18:40
{******************************************************}
{ Desined for 有i个相同控件,如何指定到第i个。 }
{ copyright (c) 2003-2004 reserved }
{ Mail to wanghongbottt123@163.com with any question}
{******************************************************}
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Edit4: TEdit;
Edit5: TEdit;
Edit6: TEdit;
Edit7: TEdit;
Edit8: TEdit;
Edit9: TEdit;
Edit10: TEdit;
Button1: TButton;
Edit11: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
i,j,num:integer;
begin
if edit11.text<>'' then //edit11 is you input num
begin
num:=strtoint(edit11.Text);
j:=0;
for i:=0 to ComponentCount-1 do
begin
j:=j+1;
if j=num then
tedit(form1.Components[j-1]).Text:='ok';
end;
end;
end;
end.
- 有i个相同控件,如何指定到第i个
- 查找第i个元素
- 执行任务处理(有一台机器,上面有m个储存空间。然后有n个请求,第i个请求计算时需要占 R[i]个空间,储存计算结果则需要占据O[i]个空间)
- 有一台机器,上面有m个储存空间。然后有n个请求,第i个请求计算时需要占 R[i]个空间,储存计算结果则需要占据O[i]个空间(据O[i]个空间(其中O[i]<R[i])。问怎么安排这n个请求的顺序,使
- 指定长度的单链表,删除和插入第i个结点
- 环路上有N个加油站,每个加油站有汽油gas[i],从每个加油站到下一个消耗cost[i],求到从哪儿个加油站出发
- 搜索第i个元素的地址
- 获得ArrayList的第i个元素
- 字符串+第i个字符+字符串
- 单链表--删除第i个结点
- 【codeforces 675E】【DP+线段树维护】【给出n个车站,并告诉你第i个车站有从i+1到a[i]个车站的直达票,问你所有车站到其余各个车站的最小车票花费和】
- 注意引用数组@array第i个元素的时候,$array[i]不是@array[i]
- kmp变形 如何判断第i个字符是否匹配函数 hdu 4749
- C++中的list容器如何插入和删除第i个元素
- 从la中删除字第i个元素起共len个元素后,将他们插入到表lb中第j个元素之前
- 如何动态生成多个相同的控件
- 单链表--在第i个位置前插入元素e
- 汉诺塔V (第i个圆盘移动次数)
- 我与小鸟的一次聊天记录(留下是为了,有一天有个会心的回忆……)
- 逐点比较法生成直线,计算机图形学实验。
- asp+mapxtreme的示例代码-通过layerinfo创建图层并画矩形
- Bresenham算法
- 逐点比较发生成直线的算法
- 有i个相同控件,如何指定到第i个
- csdn代码收集
- 小谈旋转图片(源码)
- javascript+xml更新数据雏形
- Telnet 服务器概述
- 如何让DBGrid中每一行颜色按照用户自己的意愿控制
- 可视化、图形学资源收藏
- TQuery的结果到入word
- [DELPHI]TQuery的结果到入Excel