Access Как при получени Фокуса (setfocus) ост. выд

Тема в разделе "Остальные БД", создана пользователем Guest_, 26 окт 2005.

Статус темы:
Закрыта.
  1. Guest_

    Guest_ Гость

    Как при получении Фокуса (SetFocus) оставить выделенный фрагмент текста для применения SelText и опр. функции с выделенным текстом.

    пример: Есть поле с произвольным тестом, в этом тесте выделяешь часть, нажимаешь кнопку (здесь и задаётся фокус на текстовое поле) при этом выделенный фрагмент в текстовом поле снимается и выделяется весь текст. Как бы сделать, чтобы франмент остался выделенным.

    Надеюсь на ответ...
     
  2. ????

    ???? Гость

    Код (Text):
    Option Compare Database
    Dim selstart
    Dim sellen

    Private Sub test_GotFocus()

     Me.test.selstart = selstart
     Me.test.SelLength = sellen

    End Sub

    Private Sub test_LostFocus()

     selstart = Me.test.selstart
     sellen = Me.test.SelLength
     
    End Sub

    Private Sub Êíîïêà4_Click()

    Dim start
     Me.test.SetFocus

    End Sub
    две глобальные переменный для хранения свойств поля selstart - начало и SelLength - длина выделенной области. При потере фокуса сохраняем значения, при восстановлении восстанавливаем.
    З.Ы. При необходимости "обработать напильником" до необходимой формы
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей