Директива компілятора Delphi $MinEnumSize – встановлює мінімальну пам'ять, що використовується для зберігання перерахованих типів

Директива $MinEnumSize компілятора Delphi встановлює мінімальну пам'ять, що використовується для зберігання перерахованих типів.

Директива компілятора $MinEnumSize: Різні розміри перерахованих типів

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

  {$MinEnumSize 4}
  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;