For i:=0 to (ShellListView1.Items.Count -1) do if ShellListView1.Items[i].Selected=true then begin if FileExists(shelllistview1.Selected.GetNamePath)=true then begin ListView1.Items.Add.Caption:=shelllistview1.Selected.GetNamePath; end; end; laishoulin你有试吗?不行呀!
if ShellListView1.Items[i].Selected=true then
begin
if FileExists(shelllistview1.Selected.GetNamePath)=true then
begin
ListView1.Items.Add.Caption:=shelllistview1.Selected.GetNamePath;
end;
end; laishoulin你有试吗?不行呀!