|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Удалить числа до запятой
В эдите есть число 1000,5000. Как удалить числа до запятой вместе с самой запятой?
Если программа даёт неверный результат - в ней ошибка. Если же результат правильный - ошибок, как минимум, две. |
#2
|
||||
|
||||
Код:
Edit1.Text:= Copy(Edit1.Text, Pos(',', Edit1.Text)+1, Length(Edit1.Text)); Я не понял Вашего вопроса, но всё же Вам на него отвечу! |
#3
|
||||
|
||||
Цитата:
Если программа даёт неверный результат - в ней ошибка. Если же результат правильный - ошибок, как минимум, две. Последний раз редактировалось Erilar, 08.07.2013 в 20:00. |
#4
|
||||
|
||||
Цитата:
Код:
Edit1.Text:= Copy(Edit1.Text, 1, Pos(',', Edit1.Text)-1); Я не понял Вашего вопроса, но всё же Вам на него отвечу! |
Этот пользователь сказал Спасибо Alegun за это полезное сообщение: | ||
Erilar (08.07.2013)
|