init develop

[vietkaralist] / qml / vietkaralist / ScrollBar.qml

diff --git a/qml/vietkaralist/ScrollBar.qml b/qml/vietkaralist/ScrollBar.qml
new file mode 100644 (file)
index 0000000..04c2d55
--- /dev/null
+++ b/qml/vietkaralist/ScrollBar.qml
@@ -0,0 +1,31 @@
+/*
+Copyright (C) 2011  by Cuong Le <metacuong@gmail.com>
+
+This program is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program.  If not, see <http://www.gnu.org/licenses/>
+*/
+
+import QtQuick 1.1
+
+Rectangle {
+    id: scrollbar
+
+    anchors.right: parent.right
+    y: parent.visibleArea.yPosition * parent.height
+    width: 8
+    height: parent.visibleArea.heightRatio * parent.height
+    color: "#000000"
+    opacity: parent.movingVertically ? 0.5 : 0
+
+    Behavior on opacity { PropertyAnimation { properties: "opacity"; duration: 500 } }
+}