Force an MDI Window Refresh

Force an MDI Window Refresh

I sometimes want an MDI parent window to be repainted. For example, if a modal dialog is displayed over the MDI form and you click on OK, the dialog is hidden and an operation occurs, which takes a few seconds to complete. In the meantime, remnants of the dialog are still visible because Windows doesn’t have time to complete the paint operation, and the screen looks messy. MDI forms don’t have a Refresh method, and I don’t want to throw a DoEvents into my code because it’s dangerous. This code gives my MDI form a Refresh method:

 Public Sub Refresh()	Call RedrawWindow(Me.hWnd, 0&, 0&, _		RDW_ALLCHILDREN Or RDW_UPDATENOW)End Sub

You need to declare these API constants:

 Public Const RDW_ALLCHILDREN = &H80Public Const RDW_UPDATENOW = &H100' Note: The data type of the lprcUpdate ' parameter has been changed' from RECT to Any so 0& (NULL) can be passed.#If Win32 Then	Declare Function RedrawWindow Lib _		"user32" (ByVal hwnd As Long, _		lprcUpdate As Any, ByVal hrgnUpdate _		As Long, ByVal fuRedraw As Long) As Long#ElseIf Win16 Then	Declare Function RedrawWindow Lib "User" _		(ByVal hWnd As Integer, lprcUpdate As Any, _		ByVal hrgnUpdate As Integer, ByVal fuRedraw As _		Integer) As Integer#End If
Share the Post:
data observability

Data Observability Explained

Data is the lifeblood of any successful business, as it is the driving force behind critical decision-making, insight generation, and strategic development. However, due to its intricate nature, ensuring the

Heading photo, Metadata.

What is Metadata?

What is metadata? Well, It’s an odd concept to wrap your head around. Metadata is essentially the secondary layer of data that tracks details about the “regular” data. The regular