TITLE:JTextAreaのキャレットを上書きモード対応にする

JTextAreaのキャレットを上書きモード対応にする

編集者:Terai Atsuhiro
作成日:2006-01-16
更新日:2022-09-30 (金) 15:14:20

概要

JTextAreaにキャレット上の文字を上書きする上書きモードを追加します。

JTextPane edit mode (insert or overwrite)???のソースコードを変更して全角文字対応にしています。

#screenshot

サンプルコード

 // Paint a horizontal line the width of a column and 1 pixel high
 class OvertypeCaret extends DefaultCaret {
   //The overtype caret will simply be a horizontal line
   //one pixel high (once we determine where to paint it)
   public void paint(Graphics g) {
     if(isVisible()) {
       try{
         JTextComponent component = getComponent();
         TextUI mapper = component.getUI();
         Rectangle r = mapper.modelToView(component, getDot());
         g.setColor(component.getCaretColor());
         int width = g.getFontMetrics().charWidth('w');
         //全角などに対応
         if(isOvertypeMode()) {
           int pos = getCaretPosition();
           if(pos<getDocument().getLength()) {
             if(getSelectedText()!=null) {
               width = 0;
             }else{
               String str = getText(pos, 1);
               width = g.getFontMetrics().stringWidth(str);
             }
           }
         } //ここまで追加
         int y = r.y + r.height - 2;
         g.drawLine(r.x, y, r.x + width - 2, y);
       }catch(BadLocationException e) {}
     }
   }
   // Damage must be overridden whenever the paint method is overridden
   // (The damaged area is the area the caret is painted in. We must
   // consider the area for the default caret and this caret)
   protected synchronized void damage(Rectangle r) {
     if(r != null) {
       JTextComponent c = getComponent();
       x = r.x;
       y = r.y;
       //width = c.getFontMetrics(c.getFont()).charWidth('w');
       //全角対応
       width = c.getFontMetrics(c.getFont()).charWidth('あ');
       height = r.height;
       repaint();
     }
   }
 }
  • &jnlp;
  • &jar;
  • &zip;

解説

上記のサンプルでは、上書きモード用のキャレットを作成して、Insertキーで切り替えるようになっています。

上書きモード自体の動作は、JTextArea#replaceSelectionメソッドをオーバーライドすることで行われています。キー入力があった場合、次の文字までを選択して置き換える処理がこのメソッドに追加されています。

参考リンク

コメント

  • 改行の処理がまだいい加減です。 -- terai
  • テキストを選択状態にしてInsertキーを押すと、反転されたままになるようなので修正。 -- terai
  • IME起動時、「あ」を入力し、変換キー(or spaceキー)を押すたびに減っていきます。日本語対応のソースを心待ちにしています。 -- 初心者
  • バグですね。報告ありがとうございます。減らないように修正はしたのですが、置換は以下のように適当です。 -- terai
    aaaabbbb   //元のテキストの先頭で「ああ」と入力、変換して確定すると
    嗚呼bbbb   //こうならずに
    嗚呼aabbbb //こうなってしまう(まじめにやれば、なんとかなりそうだが)
  • 早速のご対応ありがとうございます。m時 -- 初心者
  • ごめんなさい。途中で送信してしまいました。文字という点で、半角1文字の上書きが全角1文字でOKだと個人的には思います。 -- 初心者
  • xyzzyを参考にして「嗚呼bbbb」の方がいかなと思ったのですが、さっき試したexcelだと「嗚呼aabbbb」になるみたいです。ので、これは仕様ということにしておきます(^^;。 -- terai
  • xyzzyは使ったことがないのですが、秀丸と同じでしょうか。「嗚呼」に「a」と入力して、「a 呼」なのは、ちょっといやでした。excel上書できるんですね。wordでIME起動中にInsertキー押下したら、ダイアログに驚きました。 -- 初心者
  • xyzzyでも「a 呼」です。他の文字の位置が上書きで出来るだけ移動しないようにするための処理だと思います。 -- terai