Временное отлючение прорисовки TextBox в форме MS Access

@Eugene-LS · Регистрация: 05.10.2016

Студворк — интернет-сервис помощи студентам

Всех приветствую.
Что то я встал в тупик и прошу помощи добрых форумчан.

Итак:
на форме есть мультилайновый TextBox с довольно длинным тестом. А сверху него кнопки для авт. встаки в него (в позицию курсора) разных "текстовых значений"
Что происходит:
Я нажимаю на кнопку ... TextBox теряет фокус и прыгает на начало (перематывая ScrollБар в НОЛЬ позишен) - код вставляет нужный текст, и восстанавливает позицию курсора и положение вертикального ScrollБара.

Всё вроде чудесно!
Но хотелось бы избавиться от перемаргивания TextBox-а (мелочь) но не приятно.
Путь к совершенству бесконечен

Прошу помощи с решением.
Зрение всем признателен.

@Capi · 27.12.2017, 08:18

Сообщение от Eugene-LS

Бyдy paд любым зaмeчaниям и пpeдлoжeниям.

Вот какие первые впечатления:

1. Смотрела на ноутбуке, поэтому при развернутой области переходов
текстбокс немного не помещается и появляется горизонтальный скроллбар.
Если курсор при этом будет в таком месте строки, что вертикальный скроллбар
не виден, то при любом переносе курсора в другое место текстбокса
происходит дерганье - строка смещается влево и вертикальный скроллбар становится виден.
Возможно, это из-за ctl.setfocus в функции определения дескриптора окна.

2. При нажатии на верхнюю кнопку (рядом с кнопкой Просмотр) все дергается очень.
Курсор заметно устанавливается сначала в верхний левый угол,
скроллбар вертикальный тоже очень заметно "обнуляется".

Больше ничего не смотрела, было мало времени.

@Eugene-LS · 27.12.2017, 08:45 **[ТС]**

Сообщение от Capi

Вот какие первые впечатления:

Cпacибo зa yчacтиe.

01.
... тeкcтбoкc нeмнoгo нe пoмeщaeтcя и пoявляeтcя гopизoнтaльный cкpoллбap.
Haпoмнитe мнe пoжaлyйcтa paзpeшeниe экpaнa вaшeгo нoyтa?
Я пoдпpaвлю.
A тaк, дeйcтвитeльнo, пpимep зaтoчeн пoд cpeднe-минимaльнoe paзpeшeниe нacтoльникa.
Ужe пpaвлю ...

02.
... Пpи нaжaтии нa вepxнюю кнoпкy (pядoм c кнoпкoй Пpocмoтp) вce дepгaeтcя oчeнь.
этo вы нaвepнoe пpo кнoпкy "Kypcop в Teкcт!"
Taк я eё "нa пaмять" ceбe ocтaвил.
Oнa выпoлняeт пoлнoe(!) вoccтaнoвлeниe пoлoжeния кypcopa и cкpoллбapa (c пepexвaтoм фoкyca нa ceбя) - из зa чeгo, coбcтвeннo и былa пoднятa этa тeмa.

Дoпoлнитeльнo:
Bыклaдывaю yмeньшeнный вapиaнт для пepcoнaльнo вaшeгo нoтикa.
И eщё paз cпacибo зa пoдcкaзкy c лeйблaми.

@Capi · 27.12.2017, 08:52

Eugene-LS,

Появилась одна идея по отключению прорисовки,
но проверить смогу не раньше субботы, когда вернусь из поездки.

Добавлено через 4 минуты
Eugene-LS,

По 01.
Я сейчас в транспорте, разрешение посмотреть не могу.
Но дело не горизонтальном скроллбаре, а в последующем передергивании строки.

@Eugene-LS · 27.12.2017, 09:10 **[ТС]**

Сообщение от Capi

Я сейчас в транспорте, разрешение посмотреть не могу.
Но дело не горизонтальном скроллбаре, а в последующем передергивании строки.

Mнe cлoжнo coздaть вaшy cитyaцию.
Этo вы пpo пocлeднюю вepcию (v08) yжe пишитe?

Teopeтичecки в пocлeднeй вepcии дaннoгo бaгa пoявлятьcя нe дoлжнo.
Или я чeгo-тo нe пoнимaю пoкa.

Добавлено через 10 минут

Сообщение от Capi

Появилась одна идея по отключению прорисовки

... Заинтригован по уши

Жду ....

@Capi · 27.12.2017, 10:13

Mнe cлoжнo coздaть вaшy cитyaцию.
Этo вы пpo пocлeднюю вepcию (v08) yжe пишитe?

Да, про последнюю версию.

@Eugene-LS · 27.12.2017, 10:21 **[ТС]**

Capi, ну где же мне нотик то раздобыть ...
Так не понимаю.
Capi, По TeamViewer или AmmyAdmin пустите к себе?
Я только одним глазком - понять что происходит ....

@Capi · 27.12.2017, 10:29

Eugene-LS,

Я сейчас только с планшетом и мобильным интернетом.
В субботу - вернусь, подумаю.

@Capi · 31.12.2017, 01:44

Eugene-LS,

Показываю получившийся вариант.
Отключать прорисовку не пришлось, и так все, вроде, нормально.
Чтобы не путаться, вынесла в отдельную базу.
Там самый минимум - по кнопке (именно по кнопке) в текстбокс вставляется фрагмент текста,
положение скроллбара восстанавливается по Вашей схеме.
При этом ничего в начало не убегает.
Для удобства проверки форму можно растягивать, границы изменяемые.

@Eugene-LS · 02.01.2018, 16:31 **[ТС]**

Сообщение от Capi

Показываю получившийся вариант.

Спасибо большое!
Вы почти не комментируете свой код, но я разобрался.
Это лихо и круто реально.
Возможно, и опубликую - после лёгкой доводки, разбора и комментирования кода (если вы заметили , я стараюсь комментировать код, ну раз уж публикую).
Capi - Это гениально!
Ещё раз СПАСИБО!

Новые блоги и статьи Все статьи Все блоги /
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть не большие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .	Оттачиваю умение писать js программы. russiannick 30.08.2026 Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .

@Eugene-LS 13266 / 5943 / 1529 Регистрация: 05.10.2016 Сообщений: 16,632

	Временное отлючение прорисовки TextBox в форме MS Access 19.12.2017, 11:45. Показов 3561. Ответов 68 Метки нет (Все метки) Всех приветствую. Что то я встал в тупик и прошу помощи добрых форумчан. Итак: на форме есть мультилайновый TextBox с довольно длинным тестом. А сверху него кнопки для авт. встаки в него (в позицию курсора) разных "текстовых значений" Что происходит: Я нажимаю на кнопку ... TextBox теряет фокус и прыгает на начало (перематывая ScrollБар в НОЛЬ позишен) - код вставляет нужный текст, и восстанавливает позицию курсора и положение вертикального ScrollБара. Всё вроде чудесно! Но хотелось бы избавиться от перемаргивания TextBox-а (мелочь) но не приятно. Путь к совершенству бесконечен Прошу помощи с решением. Зрение всем признателен. 0

@Capi Модератор 6231 / 2909 / 707 Регистрация: 12.06.2016 Сообщений: 7,839
	27.12.2017, 08:52
	Eugene-LS, Появилась одна идея по отключению прорисовки, но проверить смогу не раньше субботы, когда вернусь из поездки. Добавлено через 4 минуты Eugene-LS, По 01. Я сейчас в транспорте, разрешение посмотреть не могу. Но дело не горизонтальном скроллбаре, а в последующем передергивании строки. 0

@Eugene-LS 13266 / 5943 / 1529 Регистрация: 05.10.2016 Сообщений: 16,632
	27.12.2017, 10:21 [ТС]
	Capi, ну где же мне нотик то раздобыть ... Так не понимаю. Capi, По TeamViewer или AmmyAdmin пустите к себе? Я только одним глазком - понять что происходит .... 0

@Capi Модератор 6231 / 2909 / 707 Регистрация: 12.06.2016 Сообщений: 7,839
	27.12.2017, 10:29
	Eugene-LS, Я сейчас только с планшетом и мобильным интернетом. В субботу - вернусь, подумаю. 0