Update of /cvsroot/mahogany/M/src/gui
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23528/src/gui
Modified Files:
wxlwindow.cpp
Log Message:
handle TAB in the default viewer to allow it to work for tabbing out of a read only
window
Index: wxlwindow.cpp
===================================================================
RCS file: /cvsroot/mahogany/M/src/gui/wxlwindow.cpp,v
retrieving revision 1.144
retrieving revision 1.145
diff -b -u -2 -r1.144 -r1.145
--- wxlwindow.cpp 16 Mar 2004 01:19:46 -0000 1.144
+++ wxlwindow.cpp 8 Sep 2004 21:41:34 -0000 1.145
@@ -117,4 +117,5 @@
EVT_CHAR (wxLayoutWindow::OnChar)
+ EVT_KEY_DOWN (wxLayoutWindow::OnKeyDown)
EVT_KEY_UP (wxLayoutWindow::OnKeyUp)
@@ -833,4 +834,22 @@
void
+wxLayoutWindow::OnKeyDown(wxKeyEvent& event)
+{
+ if ( event.GetKeyCode() == WXK_TAB )
+ {
+ if ( !IsEditable() )
+ {
+ GetParent()->Navigate(event.ShiftDown()
+ ? wxNavigationKeyEvent::IsBackward
+ : wxNavigationKeyEvent::IsForward);
+ }
+ }
+ else
+ {
+ event.Skip();
+ }
+}
+
+void
wxLayoutWindow::OnKeyUp(wxKeyEvent& event)
{
-------------------------------------------------------
This SF.Net email is sponsored by BEA Weblogic Workshop
FREE Java Enterprise J2EE developer tools!
Get your free copy of BEA WebLogic Workshop 8.1 today.
http://ads.osdn.com/?ad_id=5047&alloc_id=10808&op=click
_______________________________________________
Mahogany-cvsupdates mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/mahogany-cvsupdates
