Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Типы данных

Автор: slinx 26.4.2008, 02:39

Необходимо создать новый целочисленный тип данных 24 бита. от 0 - 16 777 215 подскажите возможно ли это сделать, если да, то как?

Автор: aktuba 26.4.2008, 13:52

Код


type
  Int24 = 0..16777215;

Так?

Автор: slinx 26.4.2008, 16:53

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

Автор: VICTAR 26.4.2008, 17:50

Код


  ShowMessage(IntToStr(SizeOf(Int24)));

Автор: slinx 26.4.2008, 19:10

Неа, занимает всеравно 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;

всем спасибо.