Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

КАк убрать ковычку из строки? [D7, WinXP]


Страницы:   1 2

GH@ST ©   (2005-01-21 12:49:00) 

Ковычку имеется ввиду одинарную..тоесть как это в коде написать?


kergma   (2005-01-21 17:19:00) [1]

У меня нашлись 5 копеек:
s: "Ст'ро'ка 'в' которой'' 'д''о' 'ф'и'г'а кО'в'ы'че'к'!!'!'!'' "
================================================================
s:= ' '  + s + ' ';
i := pos('''', s);
while i>0 do
begin
  delete(s,i,1);
  i := pos('''', s);
end;
  delete(s,1,1);
  delete(s,length(s),1);
-----------------------------------------
2Poirot : БАБАХ!!!!!!


Poirot   (2005-01-21 15:44:00) [2]

Separator ©   (21.01.05 15:39) [20]
Престрелите меня:) кто ешшо что сделает с этими бЭдными Ковычечками?:)))


Poirot   (2005-01-21 15:42:00) [3]

Stanislav ©   (21.01.05 15:39) [19]
а на 2-е ковычки?:)))
Lord Zmiy ©   (21.01.05 14:53) [16]
Это один из саимых помоему не рациональных способов... и кстати реплейс что-то подобное делает:) Велосипедик изобретать буим:)


Separator   (2005-01-21 15:39:00) [4]

/[16]/
ага так:

function UborKavychek(const Value: String): String;
var
   i, j, L: Integer;
begin
   L:= Length(Value);
   j:= 0;
   SetLength(Result, L);
   for i:= 1 to L do
       if Value[i] = #39
         then Inc(j)
         else Result[i - j]:= Value[i];
   SetLength(Result, L - j);
end;

:)


Stanislav   (2005-01-21 15:39:00) [5]

L:=POS (#39,str)
Delete (str,L,1)


Ega23   (2005-01-21 15:29:00) [6]

Ега опять ересь несешь :) ...

А где ты ересь увидел????


REA   (2005-01-21 15:26:00) [7]

Ковычек не бывает. Бывают кавычки. Так что будь уверен - в строке нет ковычек.


Lord Zmiy   (2005-01-21 14:53:00) [8]

Ега опять ересь несешь :) ...
Гхост самый простой способ прогани через цикл строку посимвольно и просто замени все кавычки на ммм ... интересно а как сказать ничего :) .... или сдвинь строку на символ влево в месте встречи кавычки наверняка есть функция к сожалению не знаю такой :) напиши сам


Ega23   (2005-01-21 13:07:00) [9]

Ты вот что: задай цвет для строк в редакторе. Tools -> Editor Options -> Color


GH@ST   (2005-01-21 13:04:00) [10]

> Poirot ©
Вот теперь даже я понял..спасибо..


Poirot   (2005-01-21 13:02:00) [11]

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


GH@ST   (2005-01-21 13:01:00) [12]

Господа может я чего-то непонятно..обьясняю..простите конечно..вот пример
вот строка
What's It All About Alfie?
там ковычка...как ее оттуда убрать...речь идет о том, что таких строк много...


Ega23   (2005-01-21 12:58:00) [13]

Нихрена не понимаю, что надо...
НО ПРИКОЛЬНО-О-О-О!!!!!!   :-)))))))))))


Poirot   (2005-01-21 12:56:00) [14]

GH@ST   (21.01.05 12:54) [8]
не 3 ковычки а 4!!! Это важно! Считать умеешь?!


Poirot   (2005-01-21 12:55:00) [15]

кто больше:)
Ждём автора - вопрос реально инетресный - сабж от тела в корне отличаются:) Кому верить?: (с)
ЗЫ: если что - то я написал строку и одной ковычки, а [1] просто ковычка... )


GH@ST   (2005-01-21 12:54:00) [16]

> Ega23 ©
В некой строке среди текста есть такая ковычка..надо ее там найти и убрать..как сделать-то?


GH@ST   (2005-01-21 12:53:00) [17]

> Vlad ©
попробуй напиши
Str:=StringReplace(Str,''','',[rfReplaceAll]);


Ega23   (2005-01-21 12:53:00) [18]

Или ''''''''''''


Ega23   (2005-01-21 12:52:00) [19]

''''''


GH@ST   (2005-01-21 12:52:00) [20]

И чего бы сие значило?
Тут получается '''
а компилятору такая постановка вопроса не нравится..


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо