[ApxaHGe1]

Народ подскажите возможно ли такое?
Нужно что бы кнопка бегала за выделенным индексом!
Количество элементов в лист боксе за ранее не известно...

[Alexandr_57]

Код:

procedure TForm1.ListBox1Click(Sender: TObject);
begin
  Button1.Top:=ListBox1.Top+(ListBox1.ItemIndex*ListBox1.ItemHeight);
end;

Вот код.
Извиняюсь. Теперь код верный и проще.