Страница: 1 |
Страница: 1 |
Вопрос: ищу событие!
Добавлено: 21.10.04 00:44
Автор вопроса: Diss
Ситуация...
В Text1.text набрана строка символов (любых)
Эта строка символов ВЫДЕЛЕНА.
Удаляешь выделенный текст путём ввода другого символа, а он всёравно ещё принадлежит Text.text (это видно в событии Text1_KeyPress
где правильно обрабатывать это событие?
СПАСИБО ВСЕМ
Ответы
Всего ответов: 2
Номер ответа: 1
Автор ответа:
Surok
Вопросов: 36
Ответов: 106
Профиль | | #1
Добавлено: 21.10.04 02:40
Diss, ответ - нигде....дело в том, что событие Text1_KeyPress происходит раньше самого изменения текста. Следовательно ты правильно обрабатываешь это событие...
Вопрос только для чего..
Могу предположить, что тебе надо получить при нажатии на кнопку текст, который не выделен.
Юзай следующий код:
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim start As Single
Dim firstText As String
start = Text1.SelStart
Text1.Text = Mid(Text1.Text, 1, Text1.SelStart) & Mid(Text1.Text, Text1.SelStart + Text1.SelLength + 1, Len(Text1.Text) - Text1.SelStart + Text1.SelLength)
Text1.SelStart = start
'Print Text1.Text
End Sub
Здесь после нажатия на кнопку выделенный текст заменится нарисованным на кнопке символом..
Получить выделенный текс еще проще, соответсвенно замени
Text1.Text = Mid(Text1.Text, Text1.SelStart + 1, Text1.SelLength)
Номер ответа: 2
Автор ответа:
sne
Разработчик Offline Client
ICQ: 233286456
Вопросов: 34
Ответов: 5445
Web-сайт:
Профиль | | #2
Добавлено: 21.10.04 07:40
KeyUp ?