Показать сообщение отдельно
  #24  
Старый 13.06.2016, 12:15
Аватар для SpectraL
SpectraL SpectraL вне форума
Начинающий
 
Регистрация: 19.05.2011
Адрес: Санкт-Петербург
Сообщения: 112
Версия Delphi: 10.1 Berlin
Репутация: 10
По умолчанию

Вещественные типы и их экземпляры могут использовать элементы записи-помощника (например, TSingleHelper), который в частности содержит свойство Bytes, позволяющее побайтно рассмотреть двоичный код экземпляра, вызвавшего 'Bytes'. Например:
Код:
procedure TForm1.FormCreate(Sender: TObject);
  var
    i: Single;
begin
  i := 12.34;
  ShowMessage(IntToHex(i.Bytes[0], 2) + ' ' + IntToHex(i.Bytes[1], 2) + ' ' +
    IntToHex(i.Bytes[2], 2) + ' ' + IntToHex(i.Bytes[3], 2))
end;
Ответить с цитированием