[lmikle]

Сообщение от BigSam

Вот к примеру запись:

Код:

TRec1=record
 a:integer;
 case flag:boolean of
  True: (done:integer);
  False:(b,c:integer)
end;
Var R:TRec1;

Если следовать вашему совету, должно выделиться 20 Б,
но

Код:

ShowMessage(IntToStr( sizeof(r)))

Показывает 16

А с чего ты решил, что должно быть 20? Integer - это 4 байта.