Swing/GotoLine のバックアップの現在との差分(No.7)
- category: swing folder: GotoLine title: JTextAreaの任意の行まで移動 tags: [JTextArea, JScrollPane] tags: [JTextArea, JScrollPane, Caret] author: aterai pubdate: 2006-10-02 pubdate: 2006-10-02T01:43:48+09:00 description: 指定した行番号がJTextAreaの中で先頭にくるようにジャンプします。 image:
概要
指定した行番号がJTextArea
の中で先頭にくるようにジャンプします。
Screenshot
Advertisement
サンプルコード
JButton button = new JButton(new AbstractAction("Goto Line") {
@Override public void actionPerformed(ActionEvent e) {
Document doc = textArea.getDocument();
Element root = doc.getDefaultRootElement();
int i = 1;
int i = Integer.parseInt(textField.getText().trim());
i = Math.max(1, Math.min(root.getElementCount(), i));
try {
i = Integer.parseInt(textField.getText().trim());
i = Math.max(1, Math.min(root.getElementCount(), i));
} catch (NumberFormatException nfe) {
Toolkit.getDefaultToolkit().beep();
return;
}
try {
Element elem = root.getElement(i-1);
Element elem = root.getElement(i - 1);
Rectangle rect = textArea.modelToView(elem.getStartOffset());
Rectangle vr = scroll.getViewport().getViewRect();
rect.setSize(10, vr.height);
textArea.scrollRectToVisible(rect);
textArea.setCaretPosition(elem.getStartOffset());
//textArea.requestFocus();
} catch (BadLocationException ble) {
} catch (BadLocationException ex) {
Toolkit.getDefaultToolkit().beep();
}
}
});
#spandel
frame.getRootPane().setDefaultButton(button);
#spanend
#spanadd
EventQueue.invokeLater(() -> getRootPane().setDefaultButton(button));
#spanend
View in GitHub: Java, Kotlin解説
上記のサンプルでは、任意の行番号を指定してEnterキー、またはボタンをクリックすると、その行がJViewport
の表示範囲の最上部に配置されるよう表示領域を更新します。
上記のサンプルでは、JTextField
に任意の行番号を指定してEnterキー、またはボタンをクリックするとその行がJViewport
の表示範囲の最上部に配置されるよう表示領域を更新します。
JTextArea#setCaretPosition(int)
メソッドによるキャレットの位置変更だけでは、移動先を移動元より大きな行番号にした場合、JTextArea
の下部までしかスクロールしないので、JTextArea#modelToView(int)
メソッドで取得した座標が出来るだけ上部にくるように処理しています。
-
JTextArea#setCaretPosition(int)
メソッドによるCaret
の位置変更だけでは移動先を移動元より大きな行番号にしたときJTextArea
の下部までしかスクロールしない - そのため
Caret
の位置変更のまえにJTextArea#modelToView(int)
メソッドで取得した座標が可能なかぎり上部にくるようにJTextArea#scrollRectToVisible(...)
メソッドで表示位置を変更