object MainForm: TMainForm Caption = 'MainForm' FormLeft = 450 FormTop = 100 FormWidth = 350 FormHeight = 605 Stylesheet.Strings = ( '#ScrollDiv1 {' ' padding: 5px; ' ' border: 2px solid black; ' ' margin: 8px;' '}' ) OnCreate = MainFormCreate Visible = true object Body1: TBody style = 'font-size: 14px;' object ScrollDiv1: TDiv Style = 'background-color: blue;'#10'border-color: black;'#10'height:50px;' object Label1: TLabel Style = 'color: red;' Caption = 'Label1' end object Label2: TLabel Style = 'color: blue; width: 180px; border: 1px solid blue;' Caption = 'Label2' end object Label3: TLabel Style = 'color: brown; width: 10px; border: 1px solid brown;' Caption = '3' end object Div2: TDiv Style = 'width: 50px; height: 50px; margin: 8px; border: 2px solid black;' end end object OverflowXDiv: TDiv Style = 'min-width: 50px; min-height: 50px; margin: 6px; border: 1px solid black; border-radius: 5px; padding: 6px;' object OverflowXLabel: TLabel Caption = 'overflow-x' Style = 'margin: 6px; font-weight: bold; font-size: 1.2em; ' end object OverflowXVisible: TDemoRadioButton Caption = 'visible' OnClick = OnOverflowXClicked end object OverflowXClip: TDemoRadioButton Caption = 'clip' OnClick = OnOverflowXClicked end object OverflowXHidden: TDemoRadioButton Caption = 'hidden' OnClick = OnOverflowXClicked end object OverflowXScroll: TDemoRadioButton Caption = 'scroll' OnClick = OnOverflowXClicked end object OverflowXAuto: TDemoRadioButton Caption = 'auto' OnClick = OnOverflowXClicked end end object OverflowYDiv: TDiv Style = 'min-width: 50px; min-height: 50px; margin: 6px; border: 1px solid black; border-radius: 5px; padding: 6px;' object OverflowYLabel: TLabel Caption = 'overflow-y' Style = 'margin: 6px; font-weight: bold; font-size: 1.2em; ' OnClick = OnOverflowYClicked end object OverflowYVisible: TDemoRadioButton Caption = 'visible' OnClick = OnOverflowYClicked end object OverflowYClip: TDemoRadioButton Caption = 'clip' OnClick = OnOverflowYClicked end object OverflowYHidden: TDemoRadioButton Caption = 'hidden' OnClick = OnOverflowYClicked end object OverflowYScroll: TDemoRadioButton Caption = 'scroll' OnClick = OnOverflowYClicked end object OverflowYAuto: TDemoRadioButton Caption = 'auto' OnClick = OnOverflowYClicked end end object OptionsDiv: TDiv Style = 'min-width: 50px; min-height: 50px; margin: 6px; border: 1px solid black; border-radius: 5px; ' object AutoHideCheckBox: TDemoCheckBox Style = 'margin: 6px;' Caption = 'Auto Hide' OnClick = OnAutoHideClicked end object OverlayCheckBox: TDemoCheckBox Style = 'margin: 6px;' Caption = 'Overlay' OnClick = OnOverlayClicked end object HaveButtonsCheckBox: TDemoCheckBox Style = 'margin: 6px;' Caption = 'Have Buttons' OnClick = OnHaveButtonsClicked end object RTLCheckBox: TDemoCheckBox Style = 'margin: 6px;' Caption = 'RTL (direction)' OnClick = OnRTLClicked end object ThinCheckBox: TDemoCheckBox Style = 'margin: 6px;' Caption = 'Thin (scrollbar-width)' OnClick = OnThinClicked end object BothEdgesCheckBox: TDemoCheckBox Style = 'margin: 6px;' Caption = 'Both Edges (scrollbar-gutter)' OnClick = OnBothEdgesClicked end object ColorCheckBox: TDemoCheckBox Style = 'margin: 6px;' Caption = 'Color (scrollbar-color)' OnClick = OnColorClicked end end end end