Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Типы данных 
:(
    Опции темы
slinx
Дата 26.4.2008, 02:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 26.4.2008

Репутация: нет
Всего: нет



Необходимо создать новый целочисленный тип данных 24 бита. от 0 - 16 777 215 подскажите возможно ли это сделать, если да, то как?
PM MAIL   Вверх
aktuba
Дата 26.4.2008, 13:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Смышленный
***


Профиль
Группа: Завсегдатай
Сообщений: 1915
Регистрация: 24.4.2006
Где: Планета Земля

Репутация: 7
Всего: 38



Код

type
  Int24 = 0..16777215;


Так?


--------------------
user posted image
PM MAIL WWW Skype   Вверх
slinx
Дата 26.4.2008, 16:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 26.4.2008

Репутация: нет
Всего: нет



а памяти это будет 3байта занимать?

Это сообщение отредактировал(а) slinx - 26.4.2008, 16:55
PM MAIL   Вверх
VICTAR
Дата 26.4.2008, 17:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник
Сообщений: 1108
Регистрация: 6.10.2006

Репутация: 10
Всего: 80



Код

  ShowMessage(IntToStr(SizeOf(Int24)));


Это сообщение отредактировал(а) VICTAR - 26.4.2008, 17:50
PM MAIL   Вверх
slinx
Дата 26.4.2008, 19:10 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 26.4.2008

Репутация: нет
Всего: нет



Неа, занимает всеравно 4 байта, ну в принципе я нашел решение проблемы разделив 24 битовое число на 3 части по 8 бит и записал их как byte.
Код

  procedure cod(const dec:integer; var byte1,byte2,byte3:byte);
  begin
  byte1:= dec shr 16;
  byte2:= (dec shr 8) - (byte1 shl 8);
  byte3:= dec - (dec shr 8) shl 8;
  end;


всем спасибо.
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »


 




[ Время генерации скрипта: 0.0669 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.