Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.89/35:

uh-aleks

6 / 6 / 0

Регистрация: 02.01.2010

Сообщений: 68

Замена точки на запятую

19.02.2010, 00:03. Показов 6732. Ответов 3

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Как в строке заменить все символы точки на запятую (если таковые имеются)?

Delphi
1
2
3
var CurrentVersion : string;
...
CurrentVersion := '6.1';

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

19.02.2010, 00:03

Ответы с готовыми решениями:

Подсчёт количества пробелов и замена буквы на запятую
Дан текст состоящий из слов разделённый пробелами. Подсчитать количество пробелов в тексте. Заменить букву P на запятую. Напечатать...

замена точки на запятую?
Вот написал такой код для считывания файла ы потом вывода по нем графика. но проблема в том, что числа в файле записаны с использованием...

Замена точки на запятую в TextBox
Как заменить в, допустим, текстбоксе запись 0.4 на 0,4, то есть заменить точку на запятую?

AHTOCuK

8 / 8 / 4

Регистрация: 08.10.2009

Сообщений: 103

19.02.2010, 00:18

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
uses crt;
var s:string;
i:integer;
begin
clrscr;
writeln('Введите ваш текст');
readln(s);
for i:=1 to length(s) do
if s[i]='.' then s[i]:=',';
writeln('вот что получилось');
write(s);
end.

@uh-aleks 6 / 6 / 0 Регистрация: 02.01.2010 Сообщений: 68
	19.02.2010, 16:28 [ТС]
	Всё понятно. Спасибо 0

Inadequate

Retired

7727 / 2559 / 671

Регистрация: 17.10.2009

Сообщений: 5,100

19.02.2010, 16:35

Лучше так

Pascal
1
2
  while Pos('.', s) <> 0 do
    s[Pos('.', s)] := ',';

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

19.02.2010, 16:35

Помогаю со студенческими работами здесь

Замена символов точки на запятую
Здравствуйте всем! Суть: меняю точку на запятую, при этом макрорекодером пишется код. Замена происходи удачно. После, использую...

Замена точки на запятую в столбце
записывался макрос, который во всём столбце заменяет точку на запятую: Columns("J:J").Select Selection.Replace...

Калькулятор из одного действия - замена точки на запятую
Люди кто знает как в этом примере разобраться? void __fastcall TForm2::LabeledEdit1Change(TObject *Sender) { double a; if...

Корректная замена точки на запятую в текстовом файле
есть проблема перевода формата в текстовом файле. исходная колонка имеет текстовый формат и значение 6 знаков до точки и 5 нулей после...

Ограничение ввода символов в StringGrid и замена точки на запятую
Вопрос таков: как ограничить ввод символов в String Grid т.е, чтоб можно было вводить только символы, и , чтоб точка заменялась запятой. С...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем

Наверх