
Private Const OFFSET_P5 As Long = 63                      'IDE check
Private Const OFFSET_P6 As Long = 137                     'DefWindowProc address
Private Const OFFSET_P7 As Long = 157                     'DestroyWindow address
Private Const ARRAY_LB  As Long = 1                       'Lowest bound of
 arrays

Private Type tCode
  Buf(ARRAY_LB To 168)  As Byte                           'Code buffer
End Type

Private Type tCodeBuf
  Code                  As tCode                          'Subclass WndPro