社区
数据库相关
帖子详情
请问怎么根据循环语句生存变量.
gas_lb521
2005-12-01 11:50:14
for i:=1 to nZi1 do
begin
//生存nZi1个下拉菜单
//CbB := TComboBox.Create(Self);
//请问cbB应该怎么表示
end;
...全文
85
6
打赏
收藏
请问怎么根据循环语句生存变量.
for i:=1 to nZi1 do begin //生存nZi1个下拉菜单 //CbB := TComboBox.Create(Self); //请问cbB应该怎么表示 end;
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
6 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
gas_lb521
2005-12-01
打赏
举报
回复
顶~~!
gas_lb521
2005-12-01
打赏
举报
回复
问题在下面的这一行CbB.Items.Add(nCon_s[j]);
程序如下:
for i:=1 to nZi1 do
begin
LNum2 := pos( ss2, nZs1[i] );//第几段到}符号多少位字节
cent_con:=copy(nZs1[i], 0,LNum2-1)+'-';//得到了{}符号之间的内容
CbB := TComboBox.Create(Self);
CbB.top:=20;
CbB.Width:=100;
CbB.Height:=20;
CbB.Align :=alNone;
CbB.Name:='CbB'+inttostr(i);
CbB.Parent :=RichViewEdit1;
RichViewEdit1.InsertControl('',CbB,rvvaBaseline);
nCon_s:=SplitString(cent_con,'-');//函数分割,得到数组
nCon_i:=Length(nCon_s)-1; //得到数组数量
for j:=0 to nCon_i-1 do
//就是这里不知道怎么表示CbB,虽然下拉菜单生存啦,因CbB不变所有菜单的项就有问题啦!
CbB.Items.Add(nCon_s[j]);
CbB.ItemIndex := 0;
end;
gas_lb521
2005-12-01
打赏
举报
回复
for i:=1 to nZi1 do
begin
LNum2 := pos( ss2, nZs1[i] );//第几段到}符号多少位字节
cent_con:=copy(nZs1[i], 0,LNum2-1)+'-';//得到了{}符号之间的内容
CbB := TComboBox.Create(Self);
if i=1 then
CbB.Left:=50+totalrun
else
CbB.Left:=150+totalrun;
CbB.top:=20;
CbB.Width:=100;
CbB.Height:=20;
CbB.Align :=alNone;
CbB.Visible:=true;
CbB.Cursor:=crHandPoint;
CbB.Name:='CbB'+inttostr(i);
CbB.Parent :=RichViewEdit1;
RichViewEdit1.InsertControl('',CbB,rvvaBaseline);
totalrun:=totalrun+5;
nCon_s:=SplitString(cent_con,'-');//函数分割,得到数组
nCon_i:=Length(nCon_s)-1; //得到数组数量
for j:=0 to nCon_i-1 do
//就是这里不知道怎么表示cbB,虽然下拉菜单生存啦,菜单里面的项不对
CbB.Items.Add(nCon_s[j]);
CbB.ItemIndex := 0;
if Components[i].Name = 'CbB'+inttostr(i) then
begin
tempstr:= self.Components[i].Name;
end;
end;
qizhanfeng
2005-12-01
打赏
举报
回复
for i:=1 to nZi1 do
begin
//生存nZi1个下拉菜单
with TComboBox.Create(Self) do
begin
name := 'cb'+intTostr(i);
parent := self;
left:=100+i;
top:=100+i;
end;
end;
zhangl_cn
2005-12-01
打赏
举报
回复
for i:=1 to nZi1 do
begin
//生存nZi1个下拉菜单
//CbB := TComboBox.Create(Self);
//请问cbB应该怎么表示
end;
是生成nZi1个TComboBox还是生成nZi1个下拉选项?
要是生成选项的话这样写:
CbB := TComboBox.Create(Self);
CbB.Parent:=self;
for i:=1 to nZi1 do
begin
cbB.Items.add('选项');
end;
cb.show;
phzongna
2005-12-01
打赏
举报
回复
写清楚点,用数组不知能不能满足你的要求~
python-分支VS
循环语句
本课程主要讲解python中分支语句和
循环语句
,主要内容有: 1. if单分支语句 2. if双分支语句 3. if多分支语句 4. 猜拳游戏练习 5. while
循环语句
6.for
循环语句
7. break continue pass关键字的使用 &...
c++
循环语句
中
变量
的
生存
周期
1、本人突发奇想,突然想到c++循环体中
变量
的生命周期。 从形式上看,循环体中定义的
变量
总是存在作用域(花括号{}中),那么
变量
在循环 未结束前是否一致存在呢?在vs2013下测试得到的结果是否定的。 例, class base{ public: base(){ std::cout << "base()" << std::endl; } ~base(){ std
C语言for循环内部局部
变量
的
生存
周期问题
C语言for循环内部局部
变量
的
生存
周期问题 for循环内部局部
变量
的
生存
周期 for循环内部
变量
的
生存
周期问
C语言 3:常量和
变量
,顺序语句,选择语句,
循环语句
,作用域和
生存
期
1.编写程序的步骤以及过程(适合初学者) (1)需求:提出自己对于代码的需求,即提出问题 (2)分析:对提出的问题需求进行分析 (3)设计:即对代码的算法进行设计 (4)实施:程序代码的实施,即编码的实现 (5)测试:对自己编写代码的代码模块进行测试 2.问题提出:输入三个数字,求输出中间值。 算法实现:冒泡排序,输入三个值,先将三个值进行排序,在输出中间值,即为所求数字。 (1)代码冗余,未注意代码书写规范 #include<stdio.h> int main() { int a = 0,
C++ 循环
变量
的生命周期探索
最近在看C++primer时遇到些问题,就是for循环里面定义一个
变量
如果循环10次会为这个
变量
开辟一次的内存,还是每次循环都重新开辟一个内存。于是便做了个小小的实验,废话不多说直接上代码: 结论:大家都知道一个引用只能被绑定一次,而这个实验里这个引用一直被初始化,可见for循环内部定义({里面})的
变量
的生命周期只有这一次。循环体内部定义的
变量
会被重新初始化,但是被回收的内存还是重新拿来使...
数据库相关
2,495
社区成员
88,444
社区内容
发帖
与我相关
我的任务
数据库相关
Delphi 数据库相关
复制链接
扫一扫
分享
社区描述
Delphi 数据库相关
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章