ListBox Опции

[Адель]

как получить строку в ListBox, на корой в данный момент находится курсор??

[volvo]

Ты имеешь в виду, которая выделена?

Есть свойство ItemSelected, отсчет с 0 ...

[Адель]

Есть свойство ItemSelected, отсчет с 0 ...

у меня не работает(

if listbox.itemindex>-1 then
idEdit.Text:=listbox.Items[listbox.itemindex];

вроде так..

[volvo]

Что значит "не работает"? Вылетает?

MultiSelect чему равен?

Добавлено через 1 мин.
Да, кстати, еще вопрос: ГДЕ ты прописываешь этот код? В каком событии?

[Адель]

MultiSelect=false;
событие EditChange

[volvo]

Тогда расскажи, чего ты хочешь добиться? В EditChange меняешь содержимое этого же самого Edit-а?

Оно, кстати, работает, только что проверил, хотя ты так и не уточнила, что не так

[Адель]

procedure TForm1.SearchEditChange(Sender: TObject);
begin
  ListBox.Perform(LB_SELECTSTRING,-1,Longint(PChar(SearchEdit.Text)));
  if listbox.itemindex>-1 then
  idEdit.Text:=listbox.Items[listbox.itemindex];
end;

вот этого)

Сообщение отредактировано: Адель - 29.04.2007 3:47

[volvo]

И это тоже работает...

Разговор очень содержательный, тебе не кажется? Я больше спрашивать не буду, двух раз вполне достаточно...

[Адель]

Сорь, вопроса не поняла
->пишет что ItemSelected неиндефицирован.
не мог бы кинуть кусок кода