#include <Html.au3>
If(Not _Html_Startup('D:\ботва\autoit\htmlayout.dll')) Then Exit 7
$str='<html>'&@crlf&'<head>'&@crlf&'<style>'&@crlf&''&@crlf&'div.selector'&@crlf&'{'&@crlf&'flow:horizontal;'& _
@crlf&'height:300px;'&@crlf&'}'&@crlf&'widget#switch'&@crlf&'{'&@crlf&'height:100px; '&@crlf&'margin:*;'&@crlf& _
'assigned! : '&@crlf&'self.value-changed(); /* call when-value-changed event handler as a function */ '&@crlf& _
'value-changed! : '&@crlf&'$1(ul.bound>li[shown]).shown = null,'&@crlf& _
'$1(ul.bound>li:nth-child(<self:value>)).shown = true,'&@crlf&'$1(code#switch-value):value = self:value;'&@crlf& _
'}'&@crlf&'ul.bound > li { display:none }'&@crlf&'ul.bound > li[shown] { display:block; }'&@crlf& _
'caption { text-align:center; }'&@crlf&'</style>'&@crlf&'<head>'&@crlf&'<body>'&@crlf&'<div class="selector">'& _
@crlf&'<div style="width:100px"> '&@crlf&'<widget id="switch" type="vslider" min=1 max=4 />'&@crlf& _
'<caption>value is <code id="switch-value" /></caption>'&@crlf&'</div>'&@crlf&'<ul class="bound">'&@crlf& _
'<li shown="true">'&@crlf&'<h3>Praesent fermentum.</h3>'&@crlf& _
'Lorem ipsum dolor sit amet, consectetuer adipiscing elit. '&@crlf& _
'Maecenas vulputate malesuada erat. Nulla quam quam, porttitor nec, suscipit at, interdum in, pede. '&@crlf&'</li> '& _
@crlf&'<li>'&@crlf&'<h3>Ut imperdiet lacinia ligula.</h3>'&@crlf& _
'Vestibulum dui enim, porta sed, suscipit sed, eleifend vitae, tortor. '&@crlf& _
'Aenean dolor. Morbi mi turpis, suscipit ac, feugiat ac, tincidunt ut, leo. '&@crlf&'</li> '&@crlf&'<li #test>'&@crlf& _
'<h3>Ut imperdiet lacinia ligula.</h3>'&@crlf&'Ut tellus sem, tristique ac, consequat vitae, condimentum et, urna. '& _
@crlf&'Mauris egestas eros ac tellus. Class aptent taciti sociosqu ad litora torquent per conubia nostra, per inceptos'& _
'himenaeos. '&@crlf&'Integer fringilla mi. Quisque vel eros. Morbi mi turpis, consectetuer nec, dictum lobortis, '& _
'facilisis sit amet, libero. '&@crlf&'Praesent fermentum, dolor vel porttitor venenatis, dui lacus dignissim mauris, '& _
'et lobortis nibh tortor et pede.'&@crlf&'</li> '&@crlf&'<li>'&@crlf&'<h3>Vivamus auctor.</h3> '&@crlf& _
'Ut porttitor bibendum diam. Sed nibh risus, accumsan cursus, luctus ut, scelerisque vitae, libero. '&@crlf& _
'Nunc ac metus eu nibh consectetuer lacinia. '&@crlf&'Vestibulum malesuada ipsum a mi. '&@crlf& _
'Phasellus aliquet nulla a nunc. Curabitur commodo felis nec arcu. Duis eu pede ut quam adipiscing mattis. '&@crlf& _
'Cras est orci, iaculis in, fermentum nec, mollis a, felis. Proin elementum adipiscing diam. Sed luctus nunc in elit.'& _
@crlf&'</li>'&@crlf&'</ul>'&@crlf&'</div>'&@crlf&'</body>'&@crlf&'</html>'
$hForm = GUICreate('', 900, 650, -1, -1)
$hHtml = _Html_CreateWindow($hForm)
_Html_LoadHtml($hHtml,$str)
GUISetState(@SW_SHOW, $hForm)
Do
Until GUIGetMsg() = -3
