Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Мерцание формы при изменении размера
 
#1
15.03.2016 11:11:50
Добрый день, хочу чтобы форма плавно меняла  размер при нажатии определенный кнопки.
Есть какие то свойства самой формы или другие приемы, которые избавляют от следующего эффекта изображенного ниже:


Меняю размер циклом
for i = 1 to 10 Step 0.1
me.width = me.width + i
next
Изменено: U_M0KRH - 15.03.2016 14:06:18
 
 
 
#2
15.03.2016 11:16:34
Может Repaint? А вообще такое иногда бывает, когда не хватает памяти.
 
 
 
#3
15.03.2016 12:27:53
Вроде бы памяти с лихвой.
repaint не помогает, может конечно не в том месте его использую (Ставлю сразу перед изменением ширины)
 
 
 
#4
15.03.2016 12:29:29
Цитата
U_M0KRH написал: Ставлю сразу перед изменением ширины
А если после? )
 
 
 
#5
15.03.2016 12:49:36
Везде уже попробовал:) До, после, до и после, в начале, в конце - не помогает:)
 
 
 
#6
15.03.2016 12:55:56
Попробовал у себя (без Repaint): размер увеличивается относительно плавно. Такого эффекта, как у Вас, не наблюдаю. Только едва заметное подёргивание правого края формы.
А памяти у меня совсем мало ((
 
 
 
#7
15.03.2016 12:57:33
Application.ScreenUpdating = TRUE
и проблемы не будет
Надстройки для Excel  Парсинг сайтов  Мониторинг цен конкурентов
 
 
 
#8
15.03.2016 13:38:26
Юрий М, с увеличением размера нет проблем, все плавно.
Это происходит при уменьшении формы обратно таким же циклом, только - i.

Игорь, Application.ScreenUpdating = TRUE  никак не меняет ситуацию. Я изначально обновление и не выключал)
 
 
 
#9
15.03.2016 13:42:06
А если так?
Код
?
1
2
3
4
5
6
Application.ScreenUpdating = True
    For i = 1 To 10 Step 0.1
        Me.Width = Me.Width - i
        DoEvents
    Next
    Application.ScreenUpdating = False
 
 
 
Страницы: 1
Читают тему
Наверх
Loading...