Question

delphi listview问题

我想用opendialog控件打开个文件，然后加载到listview里显示出来，但是listview总是不显示出打开的文件名称，以下是代码
procedure TMainForm.Button1Click(Sender: TObject);
begin
if OpenDialog.Execute then begin
ListView.Items.BeginUpdate;
ListView.Items.Clear;
if RARArchive.OpenFile(OpenDialog.FileName) then
//cl.click;
else
showmessage('error opening file');
ListView.Items.EndUpdate;
end;
end;

Answer 1

你的注释处（//cl.click; ）
应该将文件名称Add到listView中
if RARArchive.OpenFile(OpenDialog.FileName) then
//cl.click;
listview1.Items.Add（OpenDialog.FileName）;
else
showmessage('error opening file');
ListView.Items.EndUpdate;
end;
end;

Answer 2

有没有把文件名加到listview里面去啊listview1.Items.Add;

Answer 3

lv1.items.add或者append(dlgOpen.filename)