[poli-smen]

Сообщение от Lord_Vlad

Встала задача, о которую я себе уже несколько часов разбиваю голову, а именно - надо найти спецсимволы в строке, точнее - символы переноса.

Как ни странно, но стандартные методы не помогают.

Пробовал такие вариации:

Код:

pos(#13#10, temp)

AnsiPos(#13#10, temp)

Наверное проблема связана с тем, что "Delphi XE4". Переменная temp как объявлена?

В Delphi 7 такой код:

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
  temp: String;
  p: Integer;
begin
  temp := 'Проверка'#13#10'переноса';
  p := Pos(#13#10, temp);
  ShowMessageFmt('Перенос найден в позиции %d', [p]);
end;

выдаёт: "Перенос найден в позиции 9"