Описание |
Функция LastDelimiter находит последнее вхождение любого набора символов разделителей (Delimiter) в строке (Source).
Если найдено, возвращается позиция. Иначе, возвращается 0.
|
|
Примечания |
Первый символ строки имеет индекс 1.
|
|
Похожие команды |
AnsiPos Находит позицию одной строки в другой
StrScan Ищет заданные символы в строке
| |
|
Пример кода : Нахождение последней позиции 1 или более символов в строке |
var
source, find : string;
position : Integer;
begin // Создание строки
source := '12345678901234567890';
// Нахождение позиции последней 1
position := LastDelimiter('1', source);
ShowMessage('Последняя 1 в '+IntToStr(position)+' позиции');
// Нахождение позиции последней 2, 4 или 6
position := LastDelimiter('246', source);
ShowMessage('Последняя 2, 4 или 6 в '+IntToStr(position)+' позиции');
end;
|
Последняя 1 в 11 позиции
Последняя 2, 4 или 6 в 16 позиции
|
|