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

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

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 15.03.2013, 19:52   #21
Poma][a
Новичок
Джуниор
 
Регистрация: 11.10.2011
Сообщений: 3,882
По умолчанию

Интересует именно вариант без привидения типов и использования стандартных процедур\функций
Poma][a вне форума Ответить с цитированием
Старый 15.03.2013, 19:55   #22
Kix.IV
Участник клуба
 
Регистрация: 11.08.2012
Сообщений: 1,226
По умолчанию

Цитата:
Интересует именно вариант без привидения типов и использования стандартных процедур\функций
А без приведения типов никак. Ведь в памяти хранится последовательность байт, а уж как вы её представите так и будет.
Kix.IV вне форума Ответить с цитированием
Старый 15.03.2013, 20:05   #23
s-andriano
Старожил
 
Аватар для s-andriano
 
Регистрация: 08.04.2012
Сообщений: 3,229
По умолчанию

Цитата:
Сообщение от Sciv Посмотреть сообщение
Через стандартные функции ord, chr. Больше никак имхо.
существует и непосредственное приведение типов:
ch := char(i);
i := byte(ch);
s-andriano вне форума Ответить с цитированием
Старый 15.03.2013, 20:06   #24
s-andriano
Старожил
 
Аватар для s-andriano
 
Регистрация: 08.04.2012
Сообщений: 3,229
По умолчанию

Цитата:
Сообщение от Poma][a Посмотреть сообщение
Интересует именно вариант без привидения типов и использования стандартных процедур\функций
Сформулируйте задачу полностью, что именно хотите получить и какими именно средствами.
Тогда либо будет найдено решение, либо объяснено, почему это невозможно.
s-andriano вне форума Ответить с цитированием
Старый 15.03.2013, 20:15   #25
Sciv
Старожил
 
Аватар для Sciv
 
Регистрация: 16.05.2012
Сообщений: 3,211
По умолчанию

Цитата:
существует и непосредственное приведение типов:
Естественно, но эти функции разве не на нем построены?

Правда при непосредственном приведении их вызывать не треба, что уже облегчает код
Начал решать проблему с помощью регулярных выражений. Теперь решаю две проблемы...
Sciv вне форума Ответить с цитированием
Старый 15.03.2013, 20:27   #26
s-andriano
Старожил
 
Аватар для s-andriano
 
Регистрация: 08.04.2012
Сообщений: 3,229
По умолчанию

Цитата:
Сообщение от Sciv Посмотреть сообщение
Естественно, но эти функции разве не на нем построены?

Правда при непосредственном приведении их вызывать не треба, что уже облегчает код
Это вообще не функции (как Вы правильно отметили - их вызывать не нужно), это - указания компилятору, как трактовать ту или иную переменную. В код они не превращаются.
Соответственно, приведение типов требует точного соответствия длин, чего в случае функций не требуется.
Например, char можно привести только к byte или shortint, а с использованием chr() - преобразовать в число любого типа (включая вещественные). И это уже находит отражение в коде, хотя и не факт, что реально вызывается функция, скорее всего, inline.
s-andriano вне форума Ответить с цитированием
Старый 15.03.2013, 20:43   #27
Poma][a
Новичок
Джуниор
 
Регистрация: 11.10.2011
Сообщений: 3,882
По умолчанию

Как без использования привидения типов(Char) и использования стандартных процедур\функций вывести символ с ASCII кодом N?
Poma][a вне форума Ответить с цитированием
Старый 15.03.2013, 21:12   #28
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

Так пойдет?
Код:
var b: Byte;
    p: ^Char;

begin
  b:=48;
  p:=@b;
  writeln(p^);
  readln;
end.
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 15.03.2013, 21:14   #29
Poma][a
Новичок
Джуниор
 
Регистрация: 11.10.2011
Сообщений: 3,882
По умолчанию

Аватар, респект!
Poma][a вне форума Ответить с цитированием
Старый 15.03.2013, 21:40   #30
Sciv
Старожил
 
Аватар для Sciv
 
Регистрация: 16.05.2012
Сообщений: 3,211
По умолчанию

Цитата:
Аватар, респект!
Присоединяюсь - однозначно респект! Но по-моему, это уже извращение мозга
Начал решать проблему с помощью регулярных выражений. Теперь решаю две проблемы...
Sciv вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как заменить определенный символ на номера попорядку? antoha487 Помощь студентам 2 04.07.2012 22:48
Ввод десятичного числа в качестве аргумента для номера строки и столбца курсора Cheater13 Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 2 24.05.2011 18:34
Как в задаче указать КРАТНЫХ №3?и еще вывести номера элементов? ketik Помощь студентам 1 10.12.2010 15:31
Как вывести символ клавиши которую нажал Alex1991 Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 2 13.11.2010 17:20
Как вывести символ в позиции 80,25 ? sanya_m Помощь студентам 2 13.03.2010 02:10