diff options
-rw-r--r-- | basctl/sdi/baside.sdi | 5 | ||||
-rw-r--r-- | basctl/source/basicide/baside2.cxx | 9 | ||||
-rw-r--r-- | basctl/source/basicide/baside2b.cxx | 4 |
3 files changed, 15 insertions, 3 deletions
diff --git a/basctl/sdi/baside.sdi b/basctl/sdi/baside.sdi index bc9232c08bfd..f40e239b01bf 100644 --- a/basctl/sdi/baside.sdi +++ b/basctl/sdi/baside.sdi @@ -57,6 +57,11 @@ shell BasicIDEShell StateMethod = GetState; ] + SID_SELECTALL + [ + ExecMethod = ExecuteCurrent; + ] + SID_CUT [ ExecMethod = ExecuteCurrent; diff --git a/basctl/source/basicide/baside2.cxx b/basctl/source/basicide/baside2.cxx index 325ff76c076e..aa1dd1ecd25e 100644 --- a/basctl/source/basicide/baside2.cxx +++ b/basctl/source/basicide/baside2.cxx @@ -999,6 +999,15 @@ void ModulWindow::ExecuteCommand( SfxRequest& rReq ) sal_uInt16 nSlot = rReq.GetSlot(); switch ( nSlot ) { + case SID_DELETE: + { + KeyEvent aFakeDelete( 0, KEY_DELETE ); + GetEditView()->KeyInput( aFakeDelete ); + break; + } + case SID_SELECTALL: + GetEditView()->SetSelection( TextSelection( TextPaM( 0, 0 ), TextPaM( 0xFFFFFFFF, 0xFFFF ) ) ); + break; case SID_BASICRUN: { BasicRun(); diff --git a/basctl/source/basicide/baside2b.cxx b/basctl/source/basicide/baside2b.cxx index 399f0b700f98..bbaddf089ad7 100644 --- a/basctl/source/basicide/baside2b.cxx +++ b/basctl/source/basicide/baside2b.cxx @@ -417,9 +417,7 @@ void EditorWindow::KeyInput( const KeyEvent& rKEvt ) if ( !bDone && ( !TextEngine::DoesKeyChangeText( rKEvt ) || ImpCanModify() ) ) { - if ( ( rKEvt.GetKeyCode().GetCode() == KEY_A) && rKEvt.GetKeyCode().IsMod1() && !rKEvt.GetKeyCode().IsMod2() ) - pEditView->SetSelection( TextSelection( TextPaM( 0, 0 ), TextPaM( 0xFFFFFFFF, 0xFFFF ) ) ); - else if ( ( rKEvt.GetKeyCode().GetCode() == KEY_Y ) && rKEvt.GetKeyCode().IsMod1() ) + if ( ( rKEvt.GetKeyCode().GetCode() == KEY_Y ) && rKEvt.GetKeyCode().IsMod1() ) bDone = sal_True; // CTRL-Y schlucken, damit kein Vorlagenkatalog else { |