Здравствуйте. При создании своей формы, наткнулся на непонятный баг. В форме есть куча контролов типа Image. При переключении списка, картинки в них либо меняются, либо удаляются оставляя пустой фон. Я пытался добавить возможность редактирования отдельного Image через процедуру MouseUp. Чтоб не прописывать макрос для каждого контрола, занес их в класс модуль. Макрос смог прописать правильно и процедуры запускались как надо, вот только картинка не менялась. Причём не просто не менялась, а в целом становилась не изменяемой. Т.е. иду по списку - картинки сменяются, нажимаю на отдельную чтоб изменить только её - класс модуль реагирует, но картинка не меняется, а также при смене значения в списке, именно эта картинка перестаёт меняться вообще, даже если изменение не запущено через класс модуль.
В прикреплённом файле простенькая форма, где воспроизвел этот баг. Подскажите, кто знает, как пофиксить это.
Здравствуйте. При создании своей формы, наткнулся на непонятный баг. В форме есть куча контролов типа Image. При переключении списка, картинки в них либо меняются, либо удаляются оставляя пустой фон. Я пытался добавить возможность редактирования отдельного Image через процедуру MouseUp. Чтоб не прописывать макрос для каждого контрола, занес их в класс модуль. Макрос смог прописать правильно и процедуры запускались как надо, вот только картинка не менялась. Причём не просто не менялась, а в целом становилась не изменяемой. Т.е. иду по списку - картинки сменяются, нажимаю на отдельную чтоб изменить только её - класс модуль реагирует, но картинка не меняется, а также при смене значения в списке, именно эта картинка перестаёт меняться вообще, даже если изменение не запущено через класс модуль.
В прикреплённом файле простенькая форма, где воспроизвел этот баг. Подскажите, кто знает, как пофиксить это.ZetMenChavo
doober, код, который вы дописали в класс модуле "If Image.Picture Is Nothing Then..." лишним конечно оказался, но вот метод в конце кода "UserForm1.Repaint" действительно то что исправляет проблему.
Большое спасибо за быструю помощь, а то работа встала из-за этого
Цитата
это не знание свойств и методов формы
Тяжело быть самоучкой, хорошо, когда такие люди как вы, выручают
doober, код, который вы дописали в класс модуле "If Image.Picture Is Nothing Then..." лишним конечно оказался, но вот метод в конце кода "UserForm1.Repaint" действительно то что исправляет проблему.
Большое спасибо за быструю помощь, а то работа встала из-за этого
Цитата
это не знание свойств и методов формы
Тяжело быть самоучкой, хорошо, когда такие люди как вы, выручают ZetMenChavo
doober, , ещё вопрос возник. А нет ещё какого способа обойти эту проблему? "Repaint" конечно решает её, но из-за этого метода теперь все элементы формы мигают. Неприглядно выглядит. К отдельным элементам этот метод, как я выяснил, не применяется, лишь к форме в целом.
doober, , ещё вопрос возник. А нет ещё какого способа обойти эту проблему? "Repaint" конечно решает её, но из-за этого метода теперь все элементы формы мигают. Неприглядно выглядит. К отдельным элементам этот метод, как я выяснил, не применяется, лишь к форме в целом.ZetMenChavo
RAN, да я как бы своими глазами вижу, что на рабочей форме элементы OptionButton и ToggleButton при наличии метода Me.Repaint моргают (на миг исчезают из-за перерисовки формы), а без него всё нормально.
RAN, да я как бы своими глазами вижу, что на рабочей форме элементы OptionButton и ToggleButton при наличии метода Me.Repaint моргают (на миг исчезают из-за перерисовки формы), а без него всё нормально.ZetMenChavo