mirror of
https://github.com/koreader/koreader
synced 2024-11-16 06:12:56 +00:00
39 lines
949 B
Lua
39 lines
949 B
Lua
local Widget = require("ui/widget/widget")
|
|
local Geom = require("ui/geometry")
|
|
|
|
local VerticalScrollBar = Widget:new{
|
|
enable = true,
|
|
low = 0,
|
|
high = 1,
|
|
|
|
width = 6,
|
|
height = 50,
|
|
bordersize = 1,
|
|
bordercolor = 15,
|
|
radius = 0,
|
|
rectcolor = 15,
|
|
}
|
|
|
|
function VerticalScrollBar:getSize()
|
|
return Geom:new{
|
|
w = self.width,
|
|
h = self.height
|
|
}
|
|
end
|
|
|
|
function VerticalScrollBar:set(low, high)
|
|
self.low = low > 0 and low or 0
|
|
self.high = high < 1 and high or 1
|
|
end
|
|
|
|
function VerticalScrollBar:paintTo(bb, x, y)
|
|
if not self.enable then return end
|
|
bb:paintBorder(x, y, self.width, self.height,
|
|
self.bordersize, self.bordercolor, self.radius)
|
|
bb:paintRect(x + self.bordersize, y + self.bordersize + self.low*self.height,
|
|
self.width - 2*self.bordersize,
|
|
self.height * (self.high - self.low), self.rectcolor)
|
|
end
|
|
|
|
return VerticalScrollBar
|