Проблема сохранилась и в IDE Delphi Rio 10.3 . Причиной оказалось то, что в модуле FMX.StdCtrls в процедуре TExpander.UpdateControlSize указана переменная FContentHeight вместо FContent.Height
procedure TExpander.UpdateControlSize(const ChangingState: Boolean);
begin
FChangingState := ChangingState;
try
if FIsExpanded then
begin
FContent.Visible := FIsExpanded;
if FButton <> nil then
Height := FButton.Height + FContent.Height; // здесь заменил FContentHeight на FContent.Height и заработало
Repaint;
end
else
begin
Repaint;
FContent.Visible := FIsExpanded;
if FButton <> nil then
Height := FButton.Height;
end;
finally
FChangingState := False;
end;
end;