procedure TForm1.Button1Click(Sender: TObject); const ss:array[0..5] of string=('a','b','c','d','e','f'); var i:integer; begin for i:=0 to 5 do combobox1.Items.Add(ss[i]); end;
combobox1.Items.Add() 是给combobox1添加记录 如果是循环使用,之前最好先清空原来的记录 借用楼上的代码 procedure TForm1.Button1Click(Sender: TObject); const ss:array[0..5] of string=('a','b','c','d','e','f'); var i:integer; begin combobox1.items.clear(); //先清空原来的数据,否则每次都会追加记录,那就和数组不一致了 for i:=0 to 5 do combobox1.Items.Add(ss[i]); end;
const
ss:array[0..5] of string=('a','b','c','d','e','f');
var
i:integer;
begin
for i:=0 to 5 do
combobox1.Items.Add(ss[i]);
end;
combobox1.Items.Add() 是什么功能呢?
如果你希望数组的值和combobox列表框的值不相同或者没任何关系,那就关联一下index就可以了
比如你选了combobox列表框的某条记录,这时候可以拿到combobox列表框的ItemIndex,然后用这个ItemIndex作为某数组的下标去取数据就可以了比如xxx := a[ItemIndex];
我没有看懂
这个程序对吗?
procedure TForm2.ComboBox1Change(Sender: TObject);
//起点设定
var
i:integer;
j:string;
begin
i:=1-combobox1.SelLength;
j:=inttostr(i);
unit1.make_start(i);
end;如果对的话
能帮我解释一下
i:=1-combobox1.SelLength;的意思吗?
为什么要被1减呢
sellength 有什么功能呢?
inttostr()有什么功能?
如果是循环使用,之前最好先清空原来的记录
借用楼上的代码
procedure TForm1.Button1Click(Sender: TObject);
const
ss:array[0..5] of string=('a','b','c','d','e','f');
var
i:integer;
begin
combobox1.items.clear(); //先清空原来的数据,否则每次都会追加记录,那就和数组不一致了
for i:=0 to 5 do
combobox1.Items.Add(ss[i]);
end;
只用itemindex就可以了吗?
是不是应该是combobox1.itemindex呢?
用来和别的列表框来区分
能帮我解释一下
i:=1-combobox1.SelLength;的意思吗? //这里是1减去combobox1当前被选中的内容的长度
为什么要被1减呢 //为什么用1减,光看这里看不出来,要看你的unit1.make_start(i);是什么逻辑,要取什么样的i
sellength 有什么功能呢? //这是得到当前被选中的内容的长度
inttostr()有什么功能? //这个是把整形变为字符串类型
只用itemindex就可以了吗?
是不是应该是combobox1.itemindex呢? //你想跟哪个combobox关联就用哪个的itemindex,我只是说明这个意思,你能明白就好
用来和别的列表框来区分
我在qq里面问你好不好?
谢谢你哦
只用itemindex就可以了吗?
是不是应该是combobox1.itemindex呢? //你想跟哪个combobox关联就用哪个的itemindex,我只是说明这个意思,你能明白就好
用来和别的列表框来区分