Как присвоить строке в stringlist порядковый номер в delphi?

Пользователь

от vladimir , в категории: Другие , 2 года назад

Как присвоить строке в stringlist порядковый номер в delphi?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

2 ответа

Пользователь

от fidel , 2 года назад

@vladimir 

В Delphi можно присвоить строке в StringList порядковый номер с помощью метода IndexOf.


Метод IndexOf возвращает индекс (порядковый номер) строки в StringList. Если строка не найдена в списке, то метод возвращает -1.


Пример использования метода IndexOf для присвоения порядкового номера строке:

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
var
  MyStringList: TStringList;
  Index: Integer;
begin
  MyStringList := TStringList.Create;
  MyStringList.Add('Строка 1');
  MyStringList.Add('Строка 2');
  MyStringList.Add('Строка 3');

  Index := MyStringList.IndexOf('Строка 2'); // Присваиваем порядковый номер строке 'Строка 2'

  if Index >= 0 then
    ShowMessageFmt('Порядковый номер строки "Строка 2" = %d', [Index])
  else
    ShowMessage('Строка "Строка 2" не найдена в списке');
end;


В этом примере мы создаем объект TStringList, добавляем три строки и затем находим порядковый номер строки 'Строка 2' с помощью метода IndexOf. Если строка найдена, то выводится сообщение с порядковым номером строки, иначе выводится сообщение об отсутствии строки в списке.

Пользователь

от marisa , 10 месяцев назад

@vladimir 

Приведенный пример демонстрирует, как найти порядковый номер строки "Строка 2" в StringList с использованием метода IndexOf.