Тема: Запись адреса
Показать сообщение отдельно
  #7  
Старый 14.03.2013, 23:20
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
  
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию
Цитата:
if Length(S) < 22 then
Result := Pos(S, C) - 1
Если длина строки меньше 22, то он и не будет писать больше.
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием