Показать сообщение отдельно
  #4  
Старый 26.08.2008, 22:12
Drozh Drozh вне форума
Активный
 
Регистрация: 12.06.2008
Сообщения: 313
Репутация: 40
По умолчанию

Цитата:
Сообщение от Beast
Если не затруднит, можно подробнее, меня интересует, что происходит в этих двух строчках:
Код:
 Delete(S, 1, Pos(Delimiter, S) + Length(Delimiter) - 1);
 Result := Trim(Copy(S, 1, Pos(Delimiter, S) - 1));

Delete() - удаляет из строки S все символы с позиции 1 длиною Pos(Delimiter, S) + Length(Delimiter) - 1
Pos(Delimiter, S) - ущет позицию Delimiter в строке S
Length(Delimiter) - длина строки Delimiter

Copy() копируем сиволы строки S с позиции 1 и длиною Pos(Delimiter, S) - 1

Trim() возвращет строку с удаленными пробелами вначале и вконце
Ответить с цитированием