An error occurred while loading the file. Please try again.
-
J-P Nurmi authored
Change-Id: I1ac6caf759e4fe18b506a81a58029a1f0953ca1f Reviewed-by:
Gabriel de Dietrich <gabriel.dedietrich@digia.com> Reviewed-by:
Jens Bache-Wiig <jens.bache-wiig@digia.com>
55e7d71f
TextArea.qml 25.94 KiB
/****************************************************************************
**
** Copyright (C) 2012 Digia Plc and/or its subsidiary(-ies).
** Contact: http://www.qt-project.org/legal
**
** This file is part of the Qt Components project.
**
** $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 Digia Plc 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 QtQuick 2.0
import QtDesktop 1.0
/*!
\qmltype TextArea
\inqmlmodule QtDesktop 1.0
\brief TextArea displays multiple lines of editable formatted text.
It can display both plain and rich text. For example:
\qml
TextArea {
width: 240
text: "<b>Hello</b> <i>World!</i>"
focus: true
}
\endqml
Setting \l {Item::focus}{focus} to \c true enables the TextEdit item to receive keyboard focus.
Clipboard support is provided by the cut(), copy(), and paste() functions, and the selection can
be handled in a traditional "mouse" mechanism by setting selectByMouse, or handled completely
from QML by manipulating selectionStart and selectionEnd, or using selectAll() or selectWord().
You can translate between cursor positions (characters from the start of the document) and pixel
points using positionAt() and positionToRectangle().
\sa TextField, TextEdit
*/
7172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140
ScrollArea {
id: area
/*!
\qmlproperty bool TextArea::::activeFocusOnPress
Whether the TextEdit should gain active focus on a mouse press. By default this is
set to true.
*/
property alias activeFocusOnPress: edit.activeFocusOnPress
/*!
\qmlproperty url TextArea::::baseUrl
This property specifies a base URL which is used to resolve relative URLs
within the text.
The default value is the url of the QML file instantiating the TextEdit item.
*/
property alias baseUrl: edit.baseUrl
/*!
\qmlproperty bool TextArea::::canPaste
Returns true if the TextEdit is writable and the content of the clipboard is
suitable for pasting into the TextEdit.
*/
property alias canPaste: edit.canPaste
/*!
\qmlproperty bool TextArea::::canRedo
Returns true if the TextEdit is writable and there are \l {undo}{undone}
operations that can be redone.
*/
property alias canRedo: edit.canRedo
/*!
\qmlproperty bool TextArea::::canUndo
Returns true if the TextEdit is writable and there are previous operations
that can be undone.
*/
property alias canUndo: edit.canUndo
/*!
\qmlproperty color TextArea::::color
The text color.
\qml
// green text using hexadecimal notation
TextEdit { color: "#00FF00" }
\endqml
\qml
// steelblue text using SVG color name
TextEdit { color: "steelblue" }
\endqml
*/
property alias color: edit.color
/*!
\qmlproperty Component TextArea::cursorDelegate
The delegate for the cursor in the TextEdit.
If you set a cursorDelegate for a TextEdit, this delegate will be used for
drawing the cursor instead of the standard cursor. An instance of the
delegate will be created and managed by the text edit when a cursor is
needed, and the x and y properties of delegate instance will be set so as
141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210
to be one pixel before the top left of the current character.
Note that the root item of the delegate component must be a QQuickItem or
QQuickItem derived item.
*/
property alias cursorDelegate: edit.cursorDelegate
/*!
\qmlproperty int TextArea::cursorPosition
The position of the cursor in the TextEdit.
*/
property alias cursorPosition: edit.cursorPosition
/*!
\qmlproperty rectangle TextArea::cursorRectangle
The rectangle where the standard text cursor is rendered
within the text edit. Read-only.
The position and height of a custom cursorDelegate are updated to follow the cursorRectangle
automatically when it changes. The width of the delegate is unaffected by changes in the
cursor rectangle.
*/
property alias cursorRectangle: edit.cursorRectangle
/*!
\qmlproperty bool TextArea::cursorVisible
The document margins of the TextEdit.
*/
property alias cursorVisible: edit.cursorVisible
/*!
\qmlproperty bool TextArea::documentMargins
If true the text edit shows a cursor.
This property is set and unset when the text edit gets active focus, but it can also
be set directly (useful, for example, if a KeyProxy might forward keys to it).
*/
property int documentMargins: 4
/*!
\qmlproperty font TextArea::font
The font of the TextArea.
*/
property alias font: edit.font
/*!
\qmlproperty enumeration TextArea::horizontalAlignment
\qmlproperty enumeration TextArea::verticalAlignment
\qmlproperty enumeration TextArea::effectiveHorizontalAlignment
Sets the horizontal and vertical alignment of the text within the TextEdit item's
width and height. By default, the text alignment follows the natural alignment
of the text, for example text that is read from left to right will be aligned to
the left.
Valid values for \c horizontalAlignment are:
\list
\li TextEdit.AlignLeft (default)
\li TextEdit.AlignRight
\li TextEdit.AlignHCenter
\li TextEdit.AlignJustify
\endlist
Valid values for \c verticalAlignment are:
\list
\li TextEdit.AlignTop (default)
\li TextEdit.AlignBottom
211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280
\li TextEdit.AlignVCenter
\endlist
When using the attached property LayoutMirroring::enabled to mirror application
layouts, the horizontal alignment of text will also be mirrored. However, the property
\c horizontalAlignment will remain unchanged. To query the effective horizontal alignment
of TextEdit, use the read-only property \c effectiveHorizontalAlignment.
*/
property alias horizontalAlignment: edit.horizontalAlignment
property alias verticalAlignment: edit.verticalAlignment
property alias effectiveHorizontalAlignment: edit.effectiveHorizontalAlignment
/*!
\qmlproperty bool TextArea::inputMethodComposing
This property holds whether the TextEdit has partial text input from an
input method.
While it is composing an input method may rely on mouse or key events from
the TextEdit to edit or commit the partial text. This property can be used
to determine when to disable events handlers that may interfere with the
correct operation of an input method.
*/
property alias inputMethodComposing: edit.inputMethodComposing
/*!
\qmlproperty enumeration TextArea::inputMethodHints
Provides hints to the input method about the expected content of the text edit and how it
should operate.
The value is a bit-wise combination of flags or Qt.ImhNone if no hints are set.
Flags that alter behavior are:
\list
\li Qt.ImhHiddenText - Characters should be hidden, as is typically used when entering passwords.
\li Qt.ImhSensitiveData - Typed text should not be stored by the active input method
in any persistent storage like predictive user dictionary.
\li Qt.ImhNoAutoUppercase - The input method should not try to automatically switch to upper case
when a sentence ends.
\li Qt.ImhPreferNumbers - Numbers are preferred (but not required).
\li Qt.ImhPreferUppercase - Upper case letters are preferred (but not required).
\li Qt.ImhPreferLowercase - Lower case letters are preferred (but not required).
\li Qt.ImhNoPredictiveText - Do not use predictive text (i.e. dictionary lookup) while typing.
\li Qt.ImhDate - The text editor functions as a date field.
\li Qt.ImhTime - The text editor functions as a time field.
\endlist
Flags that restrict input (exclusive flags) are:
\list
\li Qt.ImhDigitsOnly - Only digits are allowed.
\li Qt.ImhFormattedNumbersOnly - Only number input is allowed. This includes decimal point and minus sign.
\li Qt.ImhUppercaseOnly - Only upper case letter input is allowed.
\li Qt.ImhLowercaseOnly - Only lower case letter input is allowed.
\li Qt.ImhDialableCharactersOnly - Only characters suitable for phone dialing are allowed.
\li Qt.ImhEmailCharactersOnly - Only characters suitable for email addresses are allowed.
\li Qt.ImhUrlCharactersOnly - Only characters suitable for URLs are allowed.
\endlist
Masks:
\list
\li Qt.ImhExclusiveInputMask - This mask yields nonzero if any of the exclusive flags are used.
\endlist
*/
property alias inputMethodHints: edit.inputMethodHints
281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350
/*!
\qmlproperty int TextArea::length
Returns the total number of plain text characters in the TextEdit item.
As this number doesn't include any formatting markup it may not be the same as the
length of the string returned by the \l text property.
This property can be faster than querying the length the \l text property as it doesn't
require any copying or conversion of the TextEdit's internal string data.
*/
property alias length: edit.length
/*!
\qmlproperty int TextArea::lineCount
Returns the total number of lines in the textEdit item.
*/
property alias lineCount: edit.lineCount
/*!
\qmlproperty enumeration TextArea::mouseSelectionMode
Specifies how text should be selected using a mouse.
\list
\li TextEdit.SelectCharacters - The selection is updated with individual characters. (Default)
\li TextEdit.SelectWords - The selection is updated with whole words.
\endlist
This property only applies when \l selectByMouse is true.
*/
property alias mouseSelectionMode: edit.mouseSelectionMode
/*!
\qmlproperty bool TextArea::persistentSelection
Whether the TextEdit should keep the selection visible when it loses active focus to another
item in the scene. By default this is set to true;
*/
property alias persistentSelection: edit.persistentSelection
/*!
\qmlproperty bool TextArea::readOnly
Whether the user can interact with the TextEdit item. If this
property is set to true the text cannot be edited by user interaction.
By default this property is false.
*/
property alias readOnly: edit.readOnly
/*!
\qmlproperty enumeration TextArea::renderType
Override the default rendering type for this component.
Supported render types are:
\list
\li Text.QtRendering - the default
\li Text.NativeRendering
\endlist
Select Text.NativeRendering if you prefer text to look native on the target platform and do
not require advanced features such as transformation of the text. Using such features in
combination with the NativeRendering render type will lend poor and sometimes pixelated
results.
*/
property alias renderType: edit.renderType
351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420
/*!
\qmlproperty bool TextArea::selectByMouse
Defaults to false.
If true, the user can use the mouse to select text in some
platform-specific way. Note that for some platforms this may
not be an appropriate interaction (eg. may conflict with how
the text needs to behave inside a Flickable.
*/
property alias selectByMouse: edit.selectByMouse
/*!
\qmlproperty string TextArea::selectedText
This read-only property provides the text currently selected in the
text edit.
It is equivalent to the following snippet, but is faster and easier
to use.
\code
//myTextEdit is the id of the TextEdit
myTextEdit.text.toString().substring(myTextEdit.selectionStart, myTextEdit.selectionEnd);
\endcode
*/
property alias selectedText: edit.selectedText
/*!
\qmlproperty color TextArea::selectedTextColor
The selected text color, used in selections.
*/
property alias selectedTextColor: edit.selectedTextColor
/*!
\qmlproperty color TextArea::selectionColor
The text highlight color, used behind selections.
*/
property alias selectionColor: edit.selectionColor
/*!
\qmlproperty int TextArea::selectionEnd
The cursor position after the last character in the current selection.
This property is read-only. To change the selection, use select(start,end),
selectAll(), or selectWord().
\sa selectionStart, cursorPosition, selectedText
*/
property alias selectionEnd: edit.selectionEnd
/*!
\qmlproperty int TextArea::selectionStart
The cursor position before the first character in the current selection.
This property is read-only. To change the selection, use select(start,end),
selectAll(), or selectWord().
\sa selectionEnd, cursorPosition, selectedText
*/
property alias selectionStart: edit.selectionStart
/*!
\qmlproperty bool TextArea::tabChangesFocus
This property holds whether Tab changes focus or is accepted as input.
421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490
Defaults to false.
*/
property bool tabChangesFocus: false
/*!
\qmlproperty string TextArea::text
The text to display. If the text format is AutoText the text edit will
automatically determine whether the text should be treated as
rich text. This determination is made using Qt::mightBeRichText().
*/
property alias text: edit.text
/*!
\qmlproperty enumeration TextArea::textFormat
The way the text property should be displayed.
\list
\li TextEdit.AutoText
\li TextEdit.PlainText
\li TextEdit.RichText
\endlist
The default is TextEdit.PlainText. If the text format is TextEdit.AutoText the text edit
will automatically determine whether the text should be treated as
rich text. This determination is made using Qt::mightBeRichText().
*/
property alias textFormat: edit.textFormat
/*!
\qmlproperty real TextArea::textMargin
The margin, in pixels, around the text in the TextEdit.
*/
property alias textMargin: edit.textMargin
/*!
\qmlproperty enumeration TextArea::wrapMode
Set this property to wrap the text to the TextEdit item's width.
The text will only wrap if an explicit width has been set.
\list
\li TextEdit.NoWrap - no wrapping will be performed. If the text contains insufficient newlines, then implicitWidth will exceed a set width.
\li TextEdit.WordWrap - wrapping is done on word boundaries only. If a word is too long, implicitWidth will exceed a set width.
\li TextEdit.WrapAnywhere - wrapping is done at any point on a line, even if it occurs in the middle of a word.
\li TextEdit.Wrap - if possible, wrapping occurs at a word boundary; otherwise it will occur at the appropriate point on the line, even in the middle of a word.
\endlist
The default is TextEdit.NoWrap. If you set a width, consider using TextEdit.Wrap.
*/
property alias wrapMode: edit.wrapMode
/*!
\qmlsignal TextArea::linkActivated(string link)
This signal is emitted when the user clicks on a link embedded in the text.
The link must be in rich text or HTML format and the
\a link string provides access to the particular link.
*/
signal linkActivated(string link)
/*!
\qmlmethod TextArea::append(string)
Appends \a string as a new line to the end of the text area.
*/
function append (string) {
491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560
text += "\n" + string
verticalScrollBar.value = verticalScrollBar.maximumValue
}
/*!
\qmlmethod TextArea::copy()
Copies the currently selected text to the system clipboard.
*/
function copy() {
edit.copy();
}
/*!
\qmlmethod TextArea::cut()
Moves the currently selected text to the system clipboard.
*/
function cut() {
edit.cut();
}
/*!
\qmlmethod TextArea::deselect()
Removes active text selection.
*/
function deselect() {
edit.deselect();
}
/*!
\qmlmethod string TextArea::getFormattedText(int start, int end)
Returns the section of text that is between the \a start and \a end positions.
The returned text will be formatted according the \l textFormat property.
*/
function getFormattedText(start, end) {
return edit.getFormattedText(start, end);
}
/*!
\qmlmethod string TextArea::getText(int start, int end)
Returns the section of text that is between the \a start and \a end positions.
The returned text does not include any rich text formatting.
*/
function getText(start, end) {
return edit.getText(start, end);
}
/*!
\qmlmethod TextArea::insert(int position, string text)
Inserts \a text into the TextArea at position.
*/
function insert(position, text) {
edit.insert(position, text);
}
/*!
\qmlmethod TextArea::isRightToLeft(int start, int end)
Returns true if the natural reading direction of the editor text
found between positions \a start and \a end is right to left.
*/
function isRightToLeft(start, end) {
return edit.isRightToLeft(start, end);
561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630
}
/*!
\qmlmethod TextArea::moveCursorSelection(int position, SelectionMode mode = TextEdit.SelectCharacters)
Moves the cursor to \a position and updates the selection according to the optional \a mode
parameter. (To only move the cursor, set the \l cursorPosition property.)
When this method is called it additionally sets either the
selectionStart or the selectionEnd (whichever was at the previous cursor position)
to the specified position. This allows you to easily extend and contract the selected
text range.
The selection mode specifies whether the selection is updated on a per character or a per word
basis. If not specified the selection mode will default to TextEdit.SelectCharacters.
\list
\li TextEdit.SelectCharacters - Sets either the selectionStart or selectionEnd (whichever was at
the previous cursor position) to the specified position.
\li TextEdit.SelectWords - Sets the selectionStart and selectionEnd to include all
words between the specified position and the previous cursor position. Words partially in the
range are included.
\endlist
For example, take this sequence of calls:
\code
cursorPosition = 5
moveCursorSelection(9, TextEdit.SelectCharacters)
moveCursorSelection(7, TextEdit.SelectCharacters)
\endcode
This moves the cursor to position 5, extend the selection end from 5 to 9
and then retract the selection end from 9 to 7, leaving the text from position 5 to 7
selected (the 6th and 7th characters).
The same sequence with TextEdit.SelectWords will extend the selection start to a word boundary
before or on position 5 and extend the selection end to a word boundary on or past position 9.
*/
function moveCursorSelection(position, mode) {
edit.moveCursorSelection(position, mode);
}
/*!
\qmlmethod TextArea::paste()
Replaces the currently selected text by the contents of the system clipboard.
*/
function paste() {
edit.paste();
}
/*!
\qmlmethod int TextArea::positionAt(int x, int y)
Returns the text position closest to pixel position (\a x, \a y).
Position 0 is before the first character, position 1 is after the first character
but before the second, and so on until position \l {text}.length, which is after all characters.
*/
function positionAt(x, y) {
return edit.positionAt(x, y);
}
/*!
\qmlmethod rectangle TextArea::positionToRectangle(position)
Returns the rectangle at the given \a position in the text. The x, y,
and height properties correspond to the cursor that would describe
that position.
631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700
*/
function positionToRectangle(position) {
return edit.positionToRectangle(position);
}
/*!
\qmlmethod TextArea::redo()
Redoes the last operation if redo is \l {canRedo}{available}.
*/
function redo() {
edit.redo();
}
/*!
\qmlmethod string TextArea::remove(int start, int end)
Removes the section of text that is between the \a start and \a end positions from the TextArea.
*/
function remove(start, end) {
return edit.remove(start, end);
}
/*!
\qmlmethod TextArea::select(int start, int end)
Causes the text from \a start to \a end to be selected.
If either start or end is out of range, the selection is not changed.
After calling this, selectionStart will become the lesser
and selectionEnd will become the greater (regardless of the order passed
to this method).
\sa selectionStart, selectionEnd
*/
function select(start, end) {
edit.select(start, end);
}
/*!
\qmlmethod TextArea::selectAll()
Causes all text to be selected.
*/
function selectAll() {
edit.selectAll();
}
/*!
\qmlmethod TextArea::selectWord()
Causes the word closest to the current cursor position to be selected.
*/
function selectWord() {
edit.selectWord();
}
/*!
\qmlmethod TextArea::undo()
Undoes the last operation if undo is \l {canUndo}{available}. Deselects any
current selection, and updates the selection start to the current cursor
position.
*/
function undo() {
edit.undo();
}
color: syspal.base
701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769
width: 280
height: 120
contentWidth: edit.paintedWidth + (2 * documentMargins)
highlightOnFocus: true
frame: true
Accessible.role: Accessible.EditableText
// FIXME: probably implement text interface
Accessible.name: text
TextEdit {
MouseArea {
anchors.fill: parent
cursorShape: Qt.IBeamCursor
acceptedButtons: Qt.NoButton
}
renderType: Text.NativeRendering
id: edit
selectionColor: syspal.highlight
selectedTextColor: syspal.highlightedText
wrapMode: TextEdit.WordWrap;
width: area.viewportWidth - (2 * documentMargins)
x: documentMargins
y: documentMargins
// height has to be big enough to handle mouse focus
height: Math.max(area.height, paintedHeight)
selectByMouse: true
readOnly: false
color: syspal.text
SystemPalette {
id: syspal
colorGroup: enabled ? SystemPalette.Active : SystemPalette.Disabled
}
KeyNavigation.priority: KeyNavigation.BeforeItem
KeyNavigation.tab: area.tabChangesFocus ? area.KeyNavigation.tab : null
KeyNavigation.backtab: area.tabChangesFocus ? area.KeyNavigation.backtab : null
onContentSizeChanged: {
area.contentWidth = paintedWidth + (2 * documentMargins)
}
// keep textcursor within scrollarea
onCursorPositionChanged: {
if (cursorRectangle.y >= area.contentY + area.viewportHeight - 1.5*cursorRectangle.height - documentMargins)
area.contentY = cursorRectangle.y - area.viewportHeight + 1.5*cursorRectangle.height + documentMargins
else if (cursorRectangle.y < area.contentY)
area.contentY = cursorRectangle.y
if (cursorRectangle.x >= area.contentX + area.viewportWidth - documentMargins) {
area.contentX = cursorRectangle.x - area.viewportWidth + documentMargins
} else if (cursorRectangle.x < area.contentX)
area.contentX = cursorRectangle.x
}
onLinkActivated: area.linkActivated(link)
}
Keys.onPressed: {
if (event.key == Qt.Key_PageUp) {
verticalValue = verticalValue - area.height
} else if (event.key == Qt.Key_PageDown)
verticalValue = verticalValue + area.height
}
}