]> git.saurik.com Git - wxWidgets.git/blob - src/os2/textentry.cpp
Add missing WXK constants for the control keys
[wxWidgets.git] / src / os2 / textentry.cpp
1 ///////////////////////////////////////////////////////////////////////////////
2 // Name: src/os2/textentry.cpp
3 // Purpose: wxTextEntry implementation for wxOS2
4 // Author: Stefan Neis
5 // Created: 2007-11-18
6 // RCS-ID: $Id$
7 // Copyright: (c) 2007 Stefan Neis
8 // Licence: wxWindows licence
9 ///////////////////////////////////////////////////////////////////////////////
10
11 // ============================================================================
12 // declarations
13 // ============================================================================
14
15 // ----------------------------------------------------------------------------
16 // headers
17 // ----------------------------------------------------------------------------
18
19 // for compilers that support precompilation, includes "wx.h".
20 #include "wx/wxprec.h"
21
22 #ifdef __BORLANDC__
23 #pragma hdrstop
24 #endif
25
26 #ifndef WX_PRECOMP
27 #include "wx/arrstr.h"
28 #include "wx/string.h"
29 #endif // WX_PRECOMP
30
31 #if wxUSE_TEXTCTRL || wxUSE_COMBOBOX
32
33 #include "wx/textentry.h"
34 #include "wx/dynlib.h"
35
36 #include "wx/os2/private.h"
37
38 #define GetEditHwnd() ((HWND)(GetEditHWND()))
39
40 // ============================================================================
41 // wxTextEntry implementation
42 // ============================================================================
43
44 // ----------------------------------------------------------------------------
45 // operations on text
46 // ----------------------------------------------------------------------------
47
48 void wxTextEntry::WriteText(const wxString& text)
49 {
50 wxString newText = wxGetWindowText(GetEditHWND());
51 long from, to;
52 GetSelection(&from, &to);
53 if (from > to){
54 long swp = to;
55 to = from;
56 from = swp;
57 }
58 // Compose the new Text by replacing the selection of the old text
59 newText.replace(from, to - from, text);
60 // Set control to the new text
61 ::WinSetWindowText(GetEditHwnd(), text.c_str());
62 }
63
64 wxString wxTextEntry::DoGetValue() const
65 {
66 return wxGetWindowText(GetEditHWND());
67 }
68
69 void wxTextEntry::Remove(long from, long to)
70 {
71 DoSetSelection(from, to, SetSel_NoScroll);
72 WriteText(wxString());
73 }
74
75 // ----------------------------------------------------------------------------
76 // clipboard operations
77 // ----------------------------------------------------------------------------
78
79 void wxTextEntry::Copy()
80 {
81 ::WinSendMsg(GetEditHwnd(), EM_COPY, 0, 0);
82 }
83
84 void wxTextEntry::Cut()
85 {
86 ::WinSendMsg(GetEditHwnd(), EM_CUT, 0, 0);
87 }
88
89 void wxTextEntry::Paste()
90 {
91 ::WinSendMsg(GetEditHwnd(), EM_PASTE, 0, 0);
92 }
93
94 // ----------------------------------------------------------------------------
95 // undo/redo
96 // ----------------------------------------------------------------------------
97
98 void wxTextEntry::Undo()
99 {
100 }
101
102 void wxTextEntry::Redo()
103 {
104 // same as Undo, since Undo undoes the undo
105 Undo();
106 return;
107 }
108
109 bool wxTextEntry::CanUndo() const
110 {
111 return false;
112 }
113
114 bool wxTextEntry::CanRedo() const
115 {
116 // see comment in Redo()
117 return CanUndo();
118 }
119
120 // ----------------------------------------------------------------------------
121 // insertion point and selection
122 // ----------------------------------------------------------------------------
123
124 void wxTextEntry::SetInsertionPoint(long pos)
125 {
126 // be careful to call DoSetSelection() which is overridden in wxTextCtrl
127 // and not just SetSelection() here
128 DoSetSelection(pos, pos);
129 }
130
131 long wxTextEntry::GetInsertionPoint() const
132 {
133 long from;
134 GetSelection(&from, NULL);
135 return from;
136 }
137
138 long wxTextEntry::GetLastPosition() const
139 {
140 WNDPARAMS vParams;
141
142 vParams.fsStatus = WPM_CCHTEXT;
143 if (::WinSendMsg( GetEditHwnd()
144 ,WM_QUERYWINDOWPARAMS
145 ,&vParams
146 ,0
147 ))
148 {
149 return vParams.cchText;
150 }
151 return 0;
152 }
153
154 void wxTextEntry::DoSetSelection(long from, long to, int WXUNUSED(flags))
155 {
156 // if from and to are both -1, it means (in wxWidgets) that all text should
157 // be selected, translate this into Windows convention
158 if ( (from == -1) && (to == -1) )
159 {
160 from = 0;
161 }
162
163 ::WinSendMsg(GetEditHwnd(), EM_SETSEL, MPFROM2SHORT((USHORT)from, (USHORT)to), 0);
164 }
165
166 void wxTextEntry::GetSelection(long *from, long *to) const
167 {
168 long dwPos;
169 dwPos = (long)::WinSendMsg(GetEditHwnd(), EM_QUERYSEL, 0, 0);
170
171 if ( from )
172 *from = SHORT1FROMMP((MPARAM)dwPos);
173 if ( to )
174 *to = SHORT2FROMMP((MPARAM)dwPos);
175 }
176
177 // ----------------------------------------------------------------------------
178 // editable state
179 // ----------------------------------------------------------------------------
180
181 bool wxTextEntry::IsEditable() const
182 {
183 return (bool)LONGFROMMR(::WinSendMsg(GetEditHwnd(), EM_QUERYREADONLY, 0, 0));
184 }
185
186 void wxTextEntry::SetEditable(bool editable)
187 {
188 ::WinSendMsg(GetEditHwnd(), EM_SETREADONLY, MPFROMLONG(!editable), 0);
189 }
190
191 // ----------------------------------------------------------------------------
192 // max length
193 // ----------------------------------------------------------------------------
194
195 void wxTextEntry::SetMaxLength(unsigned long len)
196 {
197 if ( len >= 0x7fff )
198 {
199 // this will set it to a platform-specific maximum (32Kb under OS/2)
200 len = 0x7fff;
201 }
202
203 ::WinSendMsg(GetEditHwnd(), EM_SETTEXTLIMIT, MPFROMSHORT(len), 0);
204 }
205
206 #endif // wxUSE_TEXTCTRL || wxUSE_COMBOBOX