powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / RichTextBox.ScrollBars - в режиме run-time?
6 сообщений из 6, страница 1 из 1
RichTextBox.ScrollBars - в режиме run-time?
    #36592597
awl100Alex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Интересует такой вопрос: возможно-ли как-то управлять ScrollBars в RichTextBox динамическим образом, то есть включать/выключать в режиме run-time?
...
Рейтинг: 0 / 0
RichTextBox.ScrollBars - в режиме run-time?
    #36592680
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
helpScrollBars Property (RichTextBox Control)

Returns or sets a value indicating whether a RichTextBox control has horizontal or vertical scroll bars. Read-only at run time.



Если только попытаться прикрутить отдельный скроллбар....
...
Рейтинг: 0 / 0
RichTextBox.ScrollBars - в режиме run-time?
    #36593171
awl100Alex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Дело в том, что RichTextBox у меня в проекте создается динамически...
Код: plaintext
1.
2.
...
Set Richtext = Me.Controls.Add("RICHTEXT.RichtextCtrl.1", "nRichtext") 
...
Все прекрасно работает, но вот неувязочка получилась со свойством ScrollBars, которое, получается так, должно быть установлено не в run-time.
Метод Add создает объект в run-time и как, в таком случаи, мне задать ScrollBars???
...
Рейтинг: 0 / 0
RichTextBox.ScrollBars - в режиме run-time?
    #36593174
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
RichTextBox.ScrollBars - в режиме run-time?
    #36593348
awl100Alex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Понятно, значит, придется все-таки искать «отвертку» и приступать к делу. :(
...
Рейтинг: 0 / 0
RichTextBox.ScrollBars - в режиме run-time?
    #36593498
awl100Alex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Не, ну Ви только подумайте... так шобы нет, но таки да! Я это сделал! :)

Все же отобразить вертикальный Scroll в run-time получилось, в обход ограничений, через стили!..

Код: plaintext
1.
2.
3.
Dim sRich As Long
sRich = GetWindowLong(Richtext.object.hwnd, GWL_STYLE)
sRich = sRich Or WS_VSCROLL
Call SetWindowLong(Richtext.object.hwnd, GWL_STYLE, sRich)

Но правда сказать работает он немного странно.
Выражается это в том, что ползунок слабо воздействует на непосредственно scroll текста, тем не менее, если кликать мышкой в зоне «беговой дорожки» ползунка, то текст scroll-лится нормально, ползунок при этом стоит на месте.
Вобщем, такое впечатление, что у него не работает свойство Value.
Попробую разобраться, как исправить.
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / RichTextBox.ScrollBars - в режиме run-time?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]