[Drozh]

Есть тип:

Код:

  TFileMeasurement = record
   del: Char;                                       // 1 байт
   date: array [0..10] of Char;               // 11 байт
   time: array [0..5] of Char;                 // 6 байт
   antennaType: array [0..16] of Char;    // 17 байт
   antennaNumber: array [0..16] of Char; // 17 байт
   frequency: array [0..16] of Char;        // 17 байт
   cpolarPlane: array [0..16] of Char;      // 17 байт
   alfa0Min: Single;                              // 4 байта
  end; 

В сумме получается 90 байт
Функция же SizeOf упрямо возвращает 92 байта! И при записи в файл между значениями cpolarPlane и alfa0Min появляются 2 лишних байта. Откуда они?

[lmikle]

Все правильно. Выравнивание по странице. Укажи, что запись "упакованная" и будет тебе твои 90 байт.

[Drozh]

Спасибо помогло!!!