[xCoder]

Добрый вечер! Столкнулся с проблемой которую никак не могу решить, всё облазил и ничего подходящего не нашел. Имею строку текста, например: slkj'sljklskdgjskdjlkdjgsserdb=d;kl;sdlkhlsdhkkd"sd;lskdgjsdlkjslkdj;lksd Как мне найти и записать в другую строчную переменную значение db=d;kl;sdlkhlsdhkkd", точнее текст который идет между db= и "? Никак не могу понять... Буду очень благодарен, три дня вожусь уже.

[Yurk@]

находишь чотетаное db= и начинаешь писать всё остальное в эту переменную ... пока не найдешь "

[xCoder]

Сообщение от Yurk@

находишь чотетаное db= и начинаешь писать всё остальное в эту переменную ... пока не найдешь "

А с помощью чего это можно реализовать? Я просто пока только учусь.

[Yurk@]

строка пишется сразу после нахождения знака = и до знака "

Код:

var
i,j:=integer;
stg,db:string;
.......
db:='';
for i:=0 to Length(stg)-1 do
begin
if stg[i]="=" then 
begin 
for j:=i to Length(stg)-i-1 do 
db:=db+stg[i];
end
end;

я не проверял ... но принцып тот же ...

[FreeUser]

Здается мне ты парсер пишешь)))))

[xCoder]

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

Здается мне ты парсер пишешь)))))

Нет, не парсер.)) Всем спасибо!!! Получилось!

[xCoder]

Заработать, заработало но только на половину.
Вот код:

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
copy(a,pos('db=',a),length(a)-pos('db=',a)+length('db='));
delete(a,pos('"',a),length(a)-pos('"',a)+1);
end;

a:string;
Из строки: slkjsljklskdgjskdjlkdjgsserdb=d;kl;sdlkhlsdhkkd"sd ;lskdgjsdlkjslkdj;lksd удаляется все после " а перед db= всё остается т.е. получается строка вида: slkjsljklskdgjskdjlkdjgsserdb=d;kl;sdlkhlsdhkkd

[cotseec]

можно попробовать вот так:

Код:

copy(string,pos('db=',string),length(string)-pos('db=',string)+length('db='));
delete(string,pos(' " ',string),length(string)-pos('"',string)+1);

string - строка текста, с которой проводятся операции

смысл этой ахинеи:
копируем из string, начиная с позиции первого элемента (а именно 'db=') число элементов строки, равное длине строки минус позиция вхождения искомого элемента.

из оставшегося куска строки удаляем элементы, начиная с позиции первого вхождения искомого элемента (' " ') равное длина строки минус позиция элемента.

результат будет в исходной строке string, писал по памяти, но вроде так работает
по операциям над строковым типом данных можно посмотреть вот тут