beeoz

Проблема сохранилась и в 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;