//****************************************************************************
// $Module type: Class
// $Module name: cRDCImageList.pkg
// $Author     : Nils G. Svedmyr
// Created     : 2002-12-09 @ 21:00
//
// Description :
//
// $Rev History:
//    2002-12-09  Module header created
//****************************************************************************
Use cImageList.pkg

Class cRDCImageList Is A cImageList

  Procedure Construct_object
    Forward Send Construct_Object
    Set piMaxImages To 19
  End_Procedure // Construct_object

  Procedure OnCreate
    Integer iVoid
    Get AddTransparentImage "Bgn.bmp"        clFuchsia To iVoid // 0
    Get AddTransparentImage "Prev.bmp"       clFuchsia To iVoid // 1
    Get AddTransparentImage "Find16.bmp"     clFuchsia To iVoid // 2
    Get AddTransparentImage "Next.bmp"       clFuchsia To iVoid // 3
    Get AddTransparentImage "End.bmp"        clFuchsia To iVoid // 4
    Get AddTransparentImage "Prompt16.bmp"   clFuchsia To iVoid // 5
    Get AddTransparentImage "New16.bmp"      clFuchsia To iVoid // 6
    Get AddTransparentImage "Save16.bmp"     clFuchsia To iVoid // 7
    Get AddTransparentImage "Delete16.bmp"   clFuchsia To iVoid // 8
    Get AddTransparentImage "Cut16.bmp"      clFuchsia To iVoid // 9
    Get AddTransparentImage "Copy16.bmp"     clFuchsia To iVoid // 10
    Get AddTransparentImage "Paste16.bmp"    clFuchsia To iVoid // 11
    Get AddTransparentImage "Wand.bmp"       clFuchsia To iVoid // 12
    Get AddTransparentImage "CmEngine16.bmp" clFuchsia To iVoid // 13
    Get AddTransparentImage "Property16.bmp" clFuchsia To iVoid // 14
    Get AddTransparentImage "Help16.bmp"     clFuchsia To iVoid // 15
    Get AddTransparentImage "Info16.bmp"     clFuchsia To iVoid // 16
    Get AddTransparentImage "Check16.bmp"    clFuchsia To iVoid // 17
    Get AddTransparentImage "Down16.bmp"     clFuchsia To iVoid // 18
  End_Procedure // OnCreate 

End_Class // cRDCImageList