StopFlicker

Avoid the Flickering
Use this routine to stop a control (like a list or treeview) from flickering when it is getting it's data.

Original Author: Strider Solutions

Code

'Get more great source code from
' http://www.stridersolutions.com/products/cs/
Option Explicit
#If Win16 Then
  Private Declare Function LockWindowUpdate Lib "User" (ByVal hWndLock As Integer) As Integer
#Else
  Private Declare Function LockWindowUpdate Lib "User32" (ByVal hWndLock As Long) As Long
#End If
Private Sub StopFlicker(ByVal lHWnd as Long)
  Dim lRet As Long  
  'Object will not flicker - just be blank
  lRet = LockWindowUpdate(lHWnd)
End Sub
Private Sub Release()
  Dim lRet As Long  
  lRet = LockWindowUpdate(0)
End Sub

About this post

Posted: 2002-06-01
By: ArchiveBot
Viewed: 97 times

Categories

Visual Basic 6

Attachments

No attachments for this post

Comments

No comments have been added for this post.

You must be logged in to make a comment.