2 <TITLE>VLC ActiveX plugin test page</TITLE>
4 <SCRIPT LANGUAGE="JScript">
7 var sliderScrolling = false;
9 function formatTime(timeVal)
11 var timeHour = timeVal;
12 var timeSec = timeHour % 60;
14 timeSec = '0'+timeSec;
15 timeHour = (timeHour - timeSec)/60;
16 var timeMin = timeHour % 60;
18 timeMin = '0'+timeMin;
19 timeHour = (timeHour - timeMin)/60;
21 return timeHour+":"+timeMin+":"+timeSec;
23 return timeMin+":"+timeSec;
25 function go(targetURL)
27 var options = new Array(":input-repeat");
28 document.vlc.addTarget(targetURL, options, 4+8, -666);
31 sliderTimerId = setTimeout("updateInterface()", 1000);
34 function updateInterface()
36 if( ! sliderScrolling )
40 slider.Enabled = true;
41 slider.Max = vlc.Length;
42 slider.Value = vlc.Time;
43 info.innerText = formatTime(vlc.Time)+"/"+formatTime(vlc.Length);
45 else if( slider.Enabled )
47 slider.Enabled = false;
48 slider.Value = slider.Min;
49 info.innerText = "--:--/--:--";
55 sliderTimerId = setTimeout("updateInterface()", 1000);
67 <INPUT size="90" name="targetTextField" value="">
68 <INPUT type=submit value="Go" onClick="go(targetTextField.value);">
72 Insert VideoLAN.VLCPlugin.1 activex control
74 <OBJECT classid="clsid:E23FE9C6-778E-49D4-B537-38FCDE4887D8" codebase="axvlc.cab"
75 width="640" height="480" id="vlc" events="True">
76 <param name="Src" value="" />
77 <param name="ShowDisplay" value="True" />
78 <param name="Loop" value="False" />
79 <param name="AutoPlay" value="False" />
84 Insert MSComctlLib.Slider.2 activex control
86 <OBJECT classid="clsid:F08DF954-8592-11D1-B16A-00C0F0283628"
87 width="540" height="20" id="slider" events="True">
88 <param name="TickStyle" value="3" />
89 <param name="Min" value="0" />
90 <param name="Max" value="0" />
91 <param name="Value" value="0" />
92 <param name="Enabled" value="False" />
94 <SCRIPT LANGUAGE="JScript">
99 sliderTimerId = setTimeout("updateInterface()", 1000);
102 function vlc::pause()
106 clearTimeout(sliderTimerId)
114 clearTimeout(sliderTimerId)
118 slider.Value = slider.Min;
119 slider.Enabled = false;
120 info.innerText = "--:--/--:--";
124 function slider::Scroll()
126 slider.Text = formatTime(slider.Value);
127 info.innerText = slider.Text+"/"+formatTime(vlc.Length);
128 if( vlc.Time != slider.Value )
130 vlc.Time = slider.Value;
133 function slider::Change()
135 if( sliderScrolling )
137 sliderScrolling = false;
139 else if( vlc.Time != slider.Value )
141 vlc.Time = slider.Value;
146 </TD><TD width="15%">
147 <DIV id="info" style="text-align:right">--:--/--:--</DIV>
150 <INPUT type=button value="Play" onClick='document.vlc.play();'>
151 <INPUT type=button value="Stop" onClick='document.vlc.stop();'>
152 <INPUT type=button value="Pause" onClick='document.vlc.pause();'>
153 <INPUT type=button value=" << " onClick='document.vlc.playSlower();'>
154 <INPUT type=button value=" >> " onClick='document.vlc.playFaster();'>
155 <INPUT type=button value="Mute" onClick='document.vlc.toggleMute();'>
156 <INPUT type=button value="Show" onClick='document.vlc.Visible = true;'>
157 <INPUT type=button value="Hide" onClick='document.vlc.Visible = false;'>
158 <INPUT type=button value="Version" onClick='alert(document.vlc.VersionInfo);'>