Вниз
Скачать: CL | DM;

Замена символов в строке.   Найти похожие ветки 

← →
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)
Ну если дело за оптимальностью, так это не проблема, но було сомнение насчет возможности :-)



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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.009 c
1-90960
~Alice~
2002-03-13 22:20
2002.03.28
чтение из файла


3-90741
Turalyon
2002-03-01 09:31
2002.03.28
InterBase 6


14-91080
M-A-B
2002-02-04 15:09
2002.03.28
COM-порт


1-90828
Bmax
2002-03-16 07:32
2002.03.28
Клавиатура


14-91046
DenKop
2002-02-13 00:30
2002.03.28
ShareWare Components




   Наверх