@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
. Если строка найдена, то выводится сообщение с порядковым номером строки, иначе выводится сообщение об отсутствии строки в списке.
@vladimir
Приведенный пример демонстрирует, как найти порядковый номер строки "Строка 2" в StringList с использованием метода IndexOf.