Посмотрел топик, где говорили про оптимизицию. Хотелось бы завести полный, делитесь своими советами, как вы предпоситаете оптимизировать свой код, примеры и т.д. И сразу вопрос: Есть код: If Label3.ForeColor = &HFFFFFF Or Label3.ForeColor = &HFF& Then Exit Sub End If Label3.ForeColor = &HFFFFFF проиграть музыку... end sub. на имадже код: Private Sub Image1_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single) Label1.ForeColor = &HFFFF& Label2.ForeColor = &HFFFF& Label3.ForeColor = &HFFFF& Label4.ForeColor = &HFFFF& Lblback.ForeColor = &HFFFF& LblUninstall.ForeColor = &HFFFF& LblContact.ForeColor = &HFFFF& End Sub но если быстро двигать мышкой, имедж не успевает среагировать, и label'ы остаются белыми(увести курсор за пределы формы). Бывает еще что при проверке If цвета label'а на некоторых машинах тормоза.
Ответить
|