Initial import from the monolithic Qt.
[profile/ivi/qtdeclarative.git] / examples / tutorials / gettingStarted / gsQml / parts / part5 / core / TextArea.qml
1 /****************************************************************************
2 **
3 ** Copyright (C) 2011 Nokia Corporation and/or its subsidiary(-ies).
4 ** All rights reserved.
5 ** Contact: Nokia Corporation (qt-info@nokia.com)
6 **
7 ** This file is part of the QtDeclarative module of the Qt Toolkit.
8 **
9 ** $QT_BEGIN_LICENSE:BSD$
10 ** You may use this file under the terms of the BSD license as follows:
11 **
12 ** "Redistribution and use in source and binary forms, with or without
13 ** modification, are permitted provided that the following conditions are
14 ** met:
15 **   * Redistributions of source code must retain the above copyright
16 **     notice, this list of conditions and the following disclaimer.
17 **   * Redistributions in binary form must reproduce the above copyright
18 **     notice, this list of conditions and the following disclaimer in
19 **     the documentation and/or other materials provided with the
20 **     distribution.
21 **   * Neither the name of Nokia Corporation and its Subsidiary(-ies) nor
22 **     the names of its contributors may be used to endorse or promote
23 **     products derived from this software without specific prior written
24 **     permission.
25 **
26 ** THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
27 ** "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
28 ** LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
29 ** A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
30 ** OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
31 ** SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
32 ** LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
33 ** DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
34 ** THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
35 ** (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
36 ** OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE."
37 ** $QT_END_LICENSE$
38 **
39 ****************************************************************************/
40
41 import QtQuick 1.0
42
43 Rectangle {
44     id:textArea
45
46     function paste(){ textEdit.paste()}
47     function copy() { textEdit.copy() }
48     function selectAll() { textEdit.selectAll() }
49
50     width :400; height:400
51
52     property color fontColor: "white"
53     property alias textContent: textEdit.text
54     Flickable{
55         id: flickArea
56         width: parent.width; height: parent.height
57         anchors.fill:parent
58
59         boundsBehavior: Flickable.StopAtBounds
60         flickableDirection: Flickable.HorizontalFlick
61         interactive: true
62         //Will move the text Edit area to make the area visible when scrolled with keyboard strokes
63         function ensureVisible(r){
64             if (contentX >= r.x)
65             contentX = r.x;
66             else if (contentX+width <= r.x+r.width)
67             contentX = r.x+r.width-width;
68             if (contentY >= r.y)
69             contentY = r.y;
70             else if (contentY+height <= r.y+r.height)
71             contentY = r.y+r.height-height;
72         }
73
74         TextEdit{
75             id: textEdit
76             anchors.fill:parent
77             width:parent.width; height:parent.height
78             color:fontColor
79             focus: true
80             wrapMode: TextEdit.Wrap
81             font.pointSize:10
82             onCursorRectangleChanged: flickArea.ensureVisible(cursorRectangle)
83             selectByMouse: true
84         }
85     }
86 }