Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.01.2009, 17:00   #11
Jora_Kornev
Пользователь
 
Аватар для Jora_Kornev
 
Регистрация: 06.01.2009
Сообщений: 72
По умолчанию

Цитата:
Сообщение от mihali4 Посмотреть сообщение
Вот эту строчку:
s[pos('.', s)]:=',';
поменяйте на:
Код:
while pos('.', s)>0 do
s[pos('.', s)]:=',';
Я сделал немного подругому
Код:
        if pos('.',s)>0 then
         s[pos('.',s)]:=',';
У меня просто если встречается символ '.', то он только 1 раз присутствует в одном элементе массива.

Работает, всем Спасибо за оперативную помощь
ася: тристадевяносто 068 ноль восемь шесть

Последний раз редактировалось Jora_Kornev; 10.01.2009 в 17:02.
Jora_Kornev вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите найти ошибку в коде! alex2008ean Паскаль, Turbo Pascal, PascalABC.NET 1 27.12.2008 18:31
Помогите найти ошибку в коде, пожалуйста Gobl1n Паскаль, Turbo Pascal, PascalABC.NET 3 30.11.2008 17:44
Помогите найти ошибку в коде C++ Жека:) Помощь студентам 15 29.10.2008 11:32
помогите найти ошибку в коде плиз Айат Помощь студентам 2 01.10.2008 17:43
помогите найти ошибку в коде Joker88 Помощь студентам 1 04.03.2008 12:43