Ну, чтобы не извиняться за такие вопросы, я советую читать хэлп, который идет вместе со средой разработки.
Если хочешь получить текущий выбранный элемент, то пользуйся свойством ItemIndex.
Например, можно изменить предложенный Админом код вот так:
Код:
sText := ListBox1.Items.Strings[ListBox1.ItemIndex];
И в переменной sText у тебя будет текст выделенного элемента.
Но при использовании ItemIndex полезно прверять, есть ли в списке элемент с индексом ItemIndex, т.к. бывают случаи, когда, например, ItemIndex = -1
Проверку лучше делать диапазонную, например:
Код:
if ListBox1.ItemIndex in [0..ListBox1.Items.Count-1] then
begin
sText := ListBox1.Items.Strings[ListBox1.ItemIndex];
end;