sclass JExtendedTabbedPane is Swingable {
  JTabbedPane tabs;
  L<Component> components;
  SingleComponentPanel scpBesideTabs = scp();
  SingleComponentPanel scpPage = scp();
  
  *(JTabbedPane _tabs) swing {
    tabs = _tabs != null ? _tabs : jtabs();
    int n = tabCount(tabs);
    for i to n: {
      components.add(tabs.getComponentAt(i));
      tabs.setComponentAt(i, emptyPage());
    }
      
    onTabSelectedAndNow(tabs, idx ->
      scpPage.set(components.get(idx));
  }
  
  // Something with minimum size 0
  Component emptyPage() { ret horizontalStrut(0); }
  
  cachedVisual
    northAndCenter(centerAndEastWithMargin(tabs, scpBesideTabs), scpPage);
}