Парсинг

[HSR]

Есть строка -

shHash: 'f68a3c8caa1be99b3c',

Всегда между ковычек 18 символов.

Как взять эти 18 символов перед второй ковычкой?

Функцией Pars не могу спарсить т.к. ковычки одинарные.

Вроде помню можно просто тупо удалить кавычки и спарсить. Но не помню как.

[Alex11223]

Что за функция Pars?oO В дельфи вроде бы нет никакой такой стандартной функции.

А кавычки не экранируются что ли?

[HSR]

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

Что за функция Pars?oO В дельфи вроде бы нет никакой такой стандартной функции.

А кавычки не экранируются что ли?

Да да.. экранируются! Только забыл как...

[HSR]

function Ekran(const AInStr:AnsiString):AnsiString;
var
  i,j:Integer;
begin
  Result:='';
  i:=Pos('''',AInStr);
  j:=LastDelimiter('''',AInStr);
  if (i=0) or (j=0) then Exit;
  Result:=Copy(AInStr,i+1,j-i-1);
end;

Так вроде?

[Alex11223]

Ну я не знаю что вы хотите сделать и как эта функция Pars выглядит. Кавычки вроде бы просто удваиванием экранировались.

[Пепел Феникса]

нашли позицию первой кавычки, и после нее с помощью Copy берем 18 символов.

s:=Copy(str,Pos('''',str)+1,18);

[Кольша]

HSR, да вы малы и глупы, что бы писать парсеры и т.д. если не знаете, что одинарные кавычки можно подставить так

s:='Я текст и во мне есть одинарные кавычки..ах да вот они ''';

[Пепел Феникса]

я обычно кодом ставлю, ибо мне неуютно удвоение.