Основы программирования на языке Turbo Pascal. Беляева И.В. - 205 стр.

UptoLike

Составители: 

205
sizeof(альтернативная_группа FTFillRect) = sizeof(TColor) +
+ sizeof(Byte) = 1+1 = 2 байта
sizeof(альтернативная_группа FTTextInRect) = sizeof(TColor) +
+ sizeof(string[20]) = 1+21 = 22 байта
Максимальный объем среди альтернативных группу группы
FTTextInRect – 22 байта.
Теперь сведем все объемы в формулу:
sizeof(вариантная_запись) =
= sizeof(фиксированная_часть) + sizeof(поле-признак) +
+ Max{sizeof(альтернативная_группа1),
sizeof(альтернативная_группа2)
...
sizeof(альтернативная_группаN)} =
= 9 + 1 + 22 = 32 байта