свойство класса TStringList

[krikaved]

Подскажите пожалуйста свойство ItemIndex у ListBox1 чем заменить для List? Мне нужно вместо ListBox1 использовать TStringList.

Work := TWork.Create;
List := TStringList.Create;
// эту строку нужно заменить 
ListBox1.ItemIndex := ListBox1.Items.AddObject(Work.GetWorkStr, Work);
// на эту строку 
List.{не знаю} := List.AddObject(Work.GetWorkStr, Work);

[Пепел Феникса]

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

[Utkin]

Введите дополнительную переменную, которая и будет у Вас отмечать текущую строку. Все ее изменения контролируйте самостоятельно.

var
    ItemIndex: Integer;
begin
    
    механизмы по изменению ItemIndex

    ...

    List.Strings[ItemIndex] := List.AddObject(Work.GetWorkStr, Work);
end;

[Grag]

Сообщение от krikaved

Подскажите пожалуйста свойство ItemIndex у ListBox1 чем заменить для List? Мне нужно вместо ListBox1 использовать TStringList.

Помни, что класс TStringList наследует все свойства и методы класса TStrings...

[Utkin]

А при чем здесь TStrings? Ему нужен выделенный элемент Листбокса.

[Grag]

TStrings имеет функцию возвращающую индекс строки S... А, так как нет возможности выделения строки, то пусть уж сам следит за выделением строки. Просто я напомнил, что есть такая функция, чтоб велосипед не придумывать...
Хотя, может ты и прав... Причем здесь все это...

И я очень сильно сомневаюсь, что может возникнуть потребность в выделении какой-либо строки при заполнении StringLista... Вот найти нужную строку в списке - вполне возможно, а так, суета все это...