Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Мерцание при перемещении. Добавлено: 24.04.03 14:04  

Автор вопроса:  Konstantin

Мне нужно перемещять около десятка лейблов по оси Y. Делаю я это через for each изменением топа (хотя пробовал и методом move). При этом перемещении элементы сильно мерцают и это портит весь проект. Может кто-нить знает как от этого избавиться???

З.Ы. Перемещение осуществляется в зависимости от положения собственного скроллбара.

Ответить

  Ответы Всего ответов: 7  

Номер ответа: 1
Автор ответа:
 



Вопросов: 7
Ответов: 37
 Web-сайт: www.littlehumans.nm.ru
 Профиль | | #1
Добавлено: 24.04.03 14:15

  а если...

 
 попробуй поместить все label'ы в picturebox и перемещать его. Допустим, PictureBox.Top = -ScrollBar.Value*Step. 
 

Ответить

Номер ответа: 2
Автор ответа:
 Страшный Сон



Вопросов: 46
Ответов: 848
 Профиль | | #2 Добавлено: 24.04.03 16:29

Label, Image, Line и Shape - контролы для носорогов!

Ответить

Номер ответа: 3
Автор ответа:
 Konstantin



Вопросов: 1
Ответов: 19
 Профиль | | #3 Добавлено: 25.04.03 03:29

2Страшный сон>>

Ну просветите насорогов, где-же предложения, ссылки на нормальные контролы???

Ответить

Номер ответа: 4
Автор ответа:
 Konstantin



Вопросов: 1
Ответов: 19
 Профиль | | #4 Добавлено: 26.04.03 07:47

Ну, может кто-нить скажет что за контролы которые не мерцают??? Блин, народ, срочно надо, помогите плз.

Ответить

Номер ответа: 5
Автор ответа:
 Konstantin



Вопросов: 1
Ответов: 19
 Профиль | | #5 Добавлено: 28.04.03 07:34
Оказывается мерцают контролы, которые обладают прозрачностью, такие как label и image. Неужели никто не знал??? и почему никто не сказал??

Ответить

Номер ответа: 6
Автор ответа:
 Страшный Сон



Вопросов: 46
Ответов: 848
 Профиль | | #6 Добавлено: 30.04.03 12:12

Тут надо вообще без контролов. Для "носорогов" лучше так:

Подключаешь API TextOut.

Private Declare Function TextOut Lib "gdi32" Alias "TextOutA" (ByVal hDC As Long, ByVal X As Long, ByVal Y As Long, ByVal lpString As String, ByVal nCount As Long) As Long

У формы делаешь AutoRedraw в True, ScaleMode в 3, а дальше так:

TextOut Me.hdc, [координаты по X], [координаты по Y], [Отображаемая строка], [Длина строки]

Цвет строки регулируется свойством формы ForeColor, шрифт - свойством Font.

Если не работает, попробуй делать Me.Refresh после всех операций прорисовки.

Для более продвинутых можно порекомендовать SafeArray2D для быстрой попиксельной прорисовки.

Ответить

Номер ответа: 7
Автор ответа:
 Konstantin



Вопросов: 1
Ответов: 19
 Профиль | | #7 Добавлено: 02.05.03 06:58

Сэнкью вэри матч. Я уже давно все уладил.

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам