Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/unix/3.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Delphi使用for循环添加相同的项_Delphi - Fatal编程技术网

Delphi使用for循环添加相同的项

Delphi使用for循环添加相同的项,delphi,Delphi,嘿,伙计,我在delphi中制作了一个程序,加载了一个用户名列表,我想将它们全部添加到备忘录中,而不使用selectall。我想使用for循环来了解它的工作原理,正如你所看到的,我尝试了失败。它选择了两个,但只添加了最后一个,这很奇怪xD。任何帮助都将非常感谢伙计们 那么,每次都添加索引为1的项。你大概是说: for I:=Listbox1.Items.Count-1 downto 0 do Memo1.Lines.Add(ListBox1.Items[I]); 这是按相反顺序添加的。如

嘿,伙计,我在delphi中制作了一个程序,加载了一个用户名列表,我想将它们全部添加到备忘录中,而不使用selectall。我想使用for循环来了解它的工作原理,正如你所看到的,我尝试了失败。它选择了两个,但只添加了最后一个,这很奇怪xD。任何帮助都将非常感谢伙计们


那么,每次都添加索引为1的项。你大概是说:

for I:=Listbox1.Items.Count-1 downto 0 do
  Memo1.Lines.Add(ListBox1.Items[I]);
这是按相反顺序添加的。如果您希望项目的顺序相同,只需:

Memo1.Lines.Assign(ListBox1.Items);

“Memo1.Lines.Add(ListBox1.Items.Strings[1]”中是否有输入错误“1”不应该是“I”吗?X.X我觉得打字很愚蠢,因为我告诉你为什么有些人反对使用单字符变量名,尤其是
I
,因为它看起来太像
1
索引
会是一个更有意义的变量名。例如,这个问题通常是在h
1
l
。但是,在语法突出显示的情况下,OP应该已经看到了。要回答这个问题,ty bro需要等待7分钟
Memo1.Lines.Assign(ListBox1.Items);