StringReplace

[Painkiller_13]

есть функция в которой нужно заменить знак ' на пробел

mar_name:=StringReplace(mar_name,''','',[rfReplaceAll]);

Но delphi воспринимает этот знак как не как символ а как откритие новой дужки как это исправить?

[Delphi_ProGer]

Вот так:

mar_name:=StringReplace(mar_name,'''',' ',[rfReplaceAll]);

[Человек_Борща]

Глупо так.
Просто пропишите #39 или Chr(39) и меньше путаницы будет.

[Serge_Bliznykov]

Глупо так.

ничего глупого в этом нет.
Это стандартный штатный способ записать апостроф в строковой константе.

[Человек_Борща]

ничего глупого в этом нет.
Это стандартный штатный способ записать апостроф в строковой константе.

ошибка компилятора скорее всего.
Как по мне, то самый не удобный способ записи. Ошибся и все, ищи ветра в поле, а если и текст большой то вообще караул.

#39 выглядит куда приятнее =)

[artemavd]

А можно ли эту функцию применить в цикле и в цикле произвести замену символов?

[Человек_Борща]

А можно ли эту функцию применить в цикле и в цикле произвести замену символов?

Можно все. Было бы желание попробовать.

Я бы все строки скопом передал бы в функцию, зачем циклы пускать.

[artemavd]

Например так? Допустим я хочу все ненужные мне символы убрать, т.е. заменить их на пустоту в строке-примере:

var
 k: TStringList;
 i: integer;
 stroka: string;
begin
 stroka:='Какая-то длинная предлинная строка';
 k:=TStringList.Create;
 for i:=0 to k.Count - 1 do
 begin
  StringReplace(stroka,k.Strings[i],'',[rfReplaceAll];
  Application.ProcessMessages;
 end;
 k.Free;
end;

Типа такого? Писал прямо тут, может ошибся где-то. Так, интересно просто.

[Человек_Борща]

Вы вообще справку по функциям не открываете? http://www.delphibasics.ru/StringReplace.php
Надо вам по-чаще в "Основы delphi" смотреть(ссылка в шапке страницы).

В вашем коде как минимум 2 ошибки:
1. Не правильно используете функцию.
-A. StringReplace возвращает строку с внесенными туда изменениями, у вас возврат в никуда.
-B. <Результат будет здесь>:=StringReplace(<Где заменяем>,<Что ищем>,<Чем заменяем>,<Настройки функции>);
2. Зачем вы цикл по строкам пустили? Передавайте TStringList.Text и все.

[Serge_Bliznykov]

+3 ошибка.
нет смысла обращаться к k.Count и k.Strings[i] - Вы же объект только создали, он пустой, ни одной строчки в нём нет.


Вы какую задачу (изначально) хотите своим циклом решить то?!