Hallo liebe Mitglieder der User-Liste,
wer weiß wie der Feldinhalt eines Textfeldes in einem Form nach
Fokuserhalt markiert wird?
Auf einem Dialog klappt dies mit folgendem Makro:
Dim sText as String
Dim oSelection as new com.sun.star.awt.Selection
Rem get control
oTextField = oDialog.getControl("TextField1")
Rem set displayed Text
sText = oTextField.Text
oTextField.setText(sText)
Rem set selection
oSelection.Min = 0
oSelection.Max = Len(sText)
oTextField.setSelection(oSelection)
Bei Klick mit der Maus in das Textfeld, wird der Inhalt markiert (bei
Fokuserhalt des Textfeldes).
Dasselbe erreicht man bei Verwendung der TAB-Taste.
Ist das Textfeld in einer Form enthalten, kommt es in der letzten Zeile
des Makros (oTextField.setSelection(oSelection)) zu einer Fehlermeldung.
Natürlich ist der Makrocode am Anfang entsprechend auf eine Form
abgestimmt. Mit der TAB-Taste wird bei Fokuserhalt des Textfeldes der
Inhalt markiert. Bei Mausklick nur in betimmten Teilen des Feldes.
Wer weiß eine Lösung?
Gruß
Hellmuth
PS: Betriebssystem: Linux OpenSuse 10.x, OpenOffice.org Version 2.4
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
