Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.11.09;
Скачать: CL | DM;

Вниз

Как экранировать одинарную кавычку?   Найти похожие ветки 

 
<Evil>   (2008-09-29 11:26) [0]

Есть функция замены подстроки в строке:

function StrReplace(const Str, Str1, Str2: string): string;
// str - исходная строка
// str1 - подстрока, подлежащая замене
// str2 - заменяющая строка
var
 P, L: Integer;
begin
 Result := str;
 L := Length(Str1);
 repeat
   P := Pos(Str1, Result);
   if P > 0 then
   begin
     Delete(Result, P, L);
     Insert(Str2, Result, P);
   end;
 until P = 0;
end;


Но она не находит кавычки в

tmpstr = "B9 TRIBECA  LIMITED 5 SEATS "06";

StrReplace(tmpstr, "", """");


 
Труп Васи Доброго ©   (2008-09-29 11:35) [1]

поставь str1="""", а не "", так как "", это пустая строка.


 
<Evil>   (2008-09-29 11:39) [2]

блин ручник я!!!



Страницы: 1 вся ветка

Текущий архив: 2008.11.09;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.013 c
15-1221195608
[i2e]
2008-09-12 09:00
2008.11.09
Как повернуть текст на 90 градусов?


2-1220340044
Wolferio
2008-09-02 11:20
2008.11.09
DownloadFile (Кеширует при повторном обновлении)


6-1195190006
Сергей Колесник
2007-11-16 08:13
2008.11.09
Пример работы с WinPCap на дельфях


15-1221501740
Virgo_Style
2008-09-15 22:02
2008.11.09
Имеет место быть распродажа слонов от Acronis


2-1222860218
renex
2008-10-01 15:23
2008.11.09
не передается динамический массив в функцию