Question

delphi 如何获取listbox里的单个内容

我用数组将内容显示在listbox上，但是我想修改listbox里面的内容，而且还要将里面的内容分开显示，修改之后怎样保存呢？

Answer 1

....TForm1 = class(TForm)
Edit1: TEdit;//加入一文本框edit1....var
Form1: TForm1; index:integer;//加入这句....procedure TForm1.ListBox1Click(Sender: TObject);//注意listbox1要选择这功能
begin
if ListBox1.ItemIndex>-1 then begin
edit1.text:=ListBox1.Items[ListBox1.ItemIndex]; index=ListBox1.ItemIndex; end;
end;procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 then begin ListBox1.Items[index]=edit1.text; end;
end;....//选择要修改的行，在edit1输入改变内容回车，就修改了

Answer 2

ListBox上的内容不能在控件上直接修改吧。要不修改后的内容再保存回数组？