VERSION 2.00
Begin Form Sample
   BackColor       =   &H00FFFFFF&
   Caption         =   "Palette Test"
   ClientHeight    =   4020
   ClientLeft      =   795
   ClientTop       =   375
   ClientWidth     =   6120
   Height          =   4425
   Left            =   735
   LinkTopic       =   "Form1"
   ScaleHeight     =   4020
   ScaleWidth      =   6120
   Top             =   30
   Width           =   6240
   Begin CommandButton Command1
      Caption         =   "New Form"
      Height          =   735
      Left            =   1800
      TabIndex        =   1
      Top             =   840
      Width           =   1695
   End
   Begin PictureBox faded
      Height          =   435
      Left            =   0
      ScaleHeight     =   405
      ScaleWidth      =   825
      TabIndex        =   0
      Top             =   0
      Width           =   855
   End
End

Sub Command1_Click ()
form1.Show
End Sub

Sub faded_Paint ()
    FillPicture Me


End Sub

Sub Form_Load ()
TheFormLoad Me
End Sub

Sub Form_Resize ()
resizetheform Me

End Sub