Updated June 8, 2004

A97GradientFill.zip is a database containing a function that demonstrates how to enable Gradient Backgrounds for your Forms with a single function call.

Version .8

Fixed two bugs brought to my attention by David Fenton. The one pixel black border has been removed. Gradient fills now more logically starting from left to right and top to bottom.

Version .7

Fixed runtime bug. Here is the modified Form Resize event code:

Private Sub Form_Resize()
' Call our function to redraw the Form's background Picture
' Access will generate a runtime error complaining
' that our image is not in the required DIB format
' even though it is if we:
'1) Minimize the form
'2) Shrink the form vertically below about 500 Twips
If Me.WindowHeight < 500 Then Exit Sub
GradientBackground Me, m_RGBStart, m_RGBEnd, m_Direction
End Sub

Version .6