Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.28;
Скачать: [xml.tar.bz2];




Вниз

Замена символов в строке. 


Ryser   (2002-03-14 13:43) [0]

есть, к примеру, строка "12345,67" нужно перебрать по одному символу слева до зяпятой и заменить "," на "."
Есть какие-нибудь мысли?



mrcat   (2002-03-14 13:50) [1]

Используй Pos для определения положения нужного символа:
i := Pos(символ, строка);
Заменяй i-ый символ на что нужно:
строка[i] := новый_символ;



Ra   (2002-03-14 13:50) [2]

так в чем проблема?

for i:=1 to length(s) do
if s[i]="," then s[i]:="."



Alx2   (2002-03-14 13:51) [3]

function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string;



mrcat   (2002-03-14 13:51) [4]

в догонку...таким макаром можно определить только одну ЗПТ. в строке %)



Johnmen   (2002-03-14 13:54) [5]

А все это от незнания/непонимания DecimalSeparator



Андрей Сенченко   (2002-03-14 16:40) [6]

>> Johnmen © (14.03.02 13:54)

Далеко не факт



Johnmen   (2002-03-14 16:49) [7]

>Андрей Сенченко © : А какие варианты ты можешь предположить ? :)



Андрей Сенченко   (2002-03-14 18:14) [8]

Выше есть два вполне рабочих примера.



Anatoly Podgoretsky   (2002-03-14 21:39) [9]

Johnmen © (14.03.02 16:49)
while Pos(символ, строка) > 0 ...



Alx2   (2002-03-15 10:12) [10]

>Anatoly Podgoretsky © (14.03.02 21:39)
>while Pos(символ, строка) > 0 ...
ИМХО долго.
Так мы будем ездить по строке n раз, где n - количество вхождений "символ" в "строка". Много быстрее в "Ra © (14.03.02 13:50)"



JohnnyCrisJoe   (2002-03-15 10:42) [11]


> Anatoly Podgoretsky © (14.03.02 21:39)
> while Pos(символ, строка) > 0 ...


Зато как элегантно.. :))



userppp   (2002-03-15 13:20) [12]

Всем большое спасибо за уделенное внимание вопросу! Проблема уже решилась путем выделения целой части и остатка.



Alx2   (2002-03-15 13:36) [13]

>Johnmen © (14.03.02 13:54)
Пророк, однако :))



Anatoly Podgoretsky   (2002-03-15 21:15) [14]

Alx2 © (15.03.02 10:12)
Ну если дело за оптимальностью, так это не проблема, но було сомнение насчет возможности :-)




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.28;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.73 MB
Время: 0.026 c
4-91121           ctapik-net            2002-01-29 14:18  2002.03.28  
Вопрос про Hint


4-91109           Cobalt                2002-01-27 13:46  2002.03.28  
Список процессов в потоке


14-91066          lel (A)               2002-02-14 12:11  2002.03.28  
Поздравляю всех с днем влюбленных!!!!!!!!


1-90935           AlexMey               2002-03-14 11:57  2002.03.28  
Есть ли в Delphi возможность работы с регулярными выражениями?


1-90895           Света                 2002-03-18 10:06  2002.03.28  
Выход из цикла