Add thumbnail viewer to Manage Bookmarks

This commit is contained in:
df 2020-11-10 14:04:20 +00:00
parent d7c15163e1
commit 086814cafa
1 changed files with 22 additions and 1 deletions

View File

@ -15,6 +15,10 @@ set erfile [string map {' \\'} $rfile]
set len [$ts duration 1]
set start -1
set incr 1
set limit $(1-$start)
puts "
<script type=text/javascript>
var initbookmarks = '[$ts bookmarks]';
@ -39,6 +43,24 @@ var dir = '$dir';
<button class=left id=addbmark>Add Bookmark</button>
<button class=left id=delbmark>Remove Bookmark</button>
</td><td><div id=slider></div></td></tr>
<tr><td align=right>
<span class=left>Current: <span id=curbmk></span></span><br><br><br>
<button id=genthumbs title=\"Generate Thumbnails\" class=left>Generate Thumbnails</button>
</td><td>
<div id=thumbs class=hidden>
<table><tr>"
set times {}
loop v $start $limit $incr {
lappend times $v
puts "<th style=\"text-align: center\"><span class=mark>[format "%+d" $v]</span>s</th>"
}
puts "</tr><tr>"
foreach v $times {
puts "<td><img class=bmp src=/img/generating.png pos=$v></td>"
}
puts "
</tr></table>
</div></td></tr>
</table>
<div id=buttons>
<button id=save>Save Bookmarks</button>
@ -46,4 +68,3 @@ var dir = '$dir';
</div>
<div id=results class=\"hidden blood\"></div>
"