Директива компилятора Delphi $Z – устанавливает минимальную память, необходимую для держания в памяти перечислимых типов

Директива $Z компилятора Delphi устанавливает минимальную память, необходимую для держания в памяти перечислимых типов.

Директива компилятора $Z: Различные размеры перечислимых типов

type
  {$Z1}
  TCars1  = (Rover, Jaguar, Honda);    // Впишется в 1 байт
  TFruit1 = (Banana=255, Apple, Pear); // Превысит один байт

  {$Z4}
  TCars2  = (Ford, Nissan, Vauxhall);  // Теперь используется 4 байта
  TFruit2 = (Orange=255, Plum, Grape); // Теперь используется 4 байта

begin
  ShowMessage('TCars1  размер = '+IntToStr(SizeOf(TCars1)));
  ShowMessage('TFruit1 размер = '+IntToStr(SizeOf(TFruit1)));
  ShowMessage('TCars2  размер = '+IntToStr(SizeOf(TCars2)));
  ShowMessage('TFruit2 размер = '+IntToStr(SizeOf(TFruit2)));
end;