summaryrefslogtreecommitdiffstats
path: root/examples/tutorials/gettingStarted/gsQml/core/TextArea.qml
blob: 3953d9f9283d08aeebf025a19d5d0fbfa07b1076 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
/****************************************************************************
**
** Copyright (C) 2010 Nokia Corporation and/or its subsidiary(-ies).
** All rights reserved.
** Contact: Nokia Corporation (qt-info@nokia.com)
**
** This file is part of the QtDeclarative module of the Qt Toolkit.
**
** $QT_BEGIN_LICENSE:BSD$
** You may use this file under the terms of the BSD license as follows:
**
** "Redistribution and use in source and binary forms, with or without
** modification, are permitted provided that the following conditions are
** met:
**   * Redistributions of source code must retain the above copyright
**     notice, this list of conditions and the following disclaimer.
**   * Redistributions in binary form must reproduce the above copyright
**     notice, this list of conditions and the following disclaimer in
**     the documentation and/or other materials provided with the
**     distribution.
**   * Neither the name of Nokia Corporation and its Subsidiary(-ies) nor
**     the names of its contributors may be used to endorse or promote
**     products derived from this software without specific prior written
**     permission.
**
** THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
** "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
** LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
** A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
** OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
** SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
** LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
** DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
** THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
** (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
** OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE."
** $QT_END_LICENSE$
**
****************************************************************************/

import Qt 4.7

Rectangle{
	id:textArea

	function paste(){ textEdit.paste()}
	function copy() { textEdit.copy() }
	function selectAll() { textEdit.selectAll() }

	width :400; height:400

	property color fontColor: "white"
	property alias textContent: textEdit.text
	Flickable{
		id: flickArea
		width: parent.width; height: parent.height
		anchors.fill:parent

		boundsBehavior: Flickable.StopAtBounds
		flickableDirection: Flickable.HorizontalFlick
		interactive: true
		//Will move the text Edit area to make the area visible when scrolled with keyboard strokes
		function ensureVisible(r){
			if (contentX >= r.x)
			contentX = r.x;
			else if (contentX+width <= r.x+r.width)
			contentX = r.x+r.width-width;
			if (contentY >= r.y)
			contentY = r.y;
			else if (contentY+height <= r.y+r.height)
			contentY = r.y+r.height-height;
		}

		TextEdit{
			id: textEdit
			anchors.fill:parent
			width:parent.width; height:parent.height
			color:fontColor
			focus: true
			wrapMode: TextEdit.Wrap
			font.pointSize:10
			onCursorRectangleChanged: flickArea.ensureVisible(cursorRectangle)
			selectByMouse: true
		}
	}
}