Вторник, 17.06.2025, 05:32 Приветствую Вас Гость

Решение задач любой сложности

Главная | Регистрация | Вход | RSS

Все статьи на сайте

Главная » Статьи » Решение заданий Delphi

Задача: Перевести заданное десятичное число в символ

В целом, задачи на вывод кода какого-либо символа или же обратная операция перевод символа в ANSI-код встречаются достаточно часто. Что касается профессиональных примеров - то с полной уверенностью к задачам такого типа можно отнести работу с данными, приходящими на COM-port.

Решение заданий по упомянутой теме как правило связано с использованием функций ord() и chr(). Но применить эти функции бывает не так просто, как кажется, потому что они работают с переменными типа Char. И зачастую возникает вопрос о переводе Char в string. Потому что выводить-то в результате требуется в строковом формате.
Так давайте разберемся с этим злосчастным переводом Char в string раз и навсегда.
Удивительно, но char, являющийся ничем иным как символом, является по сути частью строки string. Ведь строка - это массив символов. Иными словами
ch1:='M'; ch2:='A'; ch3:='M'; ch4:='A';
s[1]:=ch1; s[2]:=ch2; s[3]:=ch3; s[4]:=ch4;
// Не трудно догадаться, что в s у нас получится очень простое слово: МАМА.
Вот такой вот перевод. Фактически мы можем сразу присвоить строковой переменной значение переменной типа Char.
Теперь рассмотрим программу на delphi, которая переводит любое введенное пользователем десятичное число (n:integer) в символ и выводит его в TEdit.
Исходники Delphi:

 n:=StrToInt(Edit1.Text);
 Edit1.Text:=chr(n)


Вот так - всего 2 строчки.

Интересует решение каких-либо еще заданий по данной теме - обращайтесь - напишу программу на заказ.
Категория: Решение заданий Delphi | Добавил: Мятка (21.10.2010) | Автор: Alexandra W
Просмотров: 7055 | Комментарии: 1 | Теги: программы на заказ, примеры Delphi, написать программу, алгоритм, решение заданий, Delphi исходники, решение на заказ, программирование на delphi | Рейтинг: 0.0/0
Всего комментариев: 0
Имя *:
Email *:
Код *: