如何判断ListBox中的项有没有被选中？

Question

listbox中selected属性
listbox1.selected

Answer 1

用listbox1.itemindex来判断
listbox1.itemindex＝－1没有选中的项
listbox1.itemindex>=0有选中的项

Answer 2

ListBox1.Selected[Index: Integer]: Boolean;
可判断那一项被选中了。
var  F: File;
  i: Integer;
begin
  for i := 0 to (FileListBox1.Items.Count - 1) do begin
  try
    if FileListBox1.Selected[i] then 
    begin
      if not FileExists(FileListBox1.Items.Strings[i]) then begin
        MessageDlg('File: ' + FileListBox1.Items.Strings[i] + 
                   ' not found', mtError, [mbOk], 0);
        Continue;
      end;
      AssignFile(F, FileListBox1.Items.Strings[i]);      Reset(F, 1);
      ListBox1.Items.Add(IntToStr(FileSize(F)));
      CloseFile(F);
    end;
   finally
   { do something here }
   end;
  end;
end;

Answer 3

listbox1.selcount
为选中的总数,如果小于1则没有选中,太简单了