[4kusNick]

А если хочешь узнать, какая именно выделена, то делай так:
...

Код:

var
 iIndex,
 iCount: Integer;
begin
 iCount :=  ListBox.Items.Count - 1;
 for iIndex := 0 to iCount do
 begin
  if ListBox.Selected[iIndex] then 
   ShowMessage('Строка '+IntToStr(iIndex)+' выделена')
 end
end;