           
               ' we have the directories, now read the icon images:
               If Not (bFail) Then
                  ReDim m_tBits(0 To m_tID.idCount - 1) As tBits
                  For iEntry = 1 To m_tID.idCount
                     ' Move to the image position:
                     SetFilePointer hFile, m_tIDE(iEntry - 1).dwImageOffset,
                      ByVal 0&amp;, FILE_BEGIN
                     ' Prepare the correct number of bits for the image:
                     ReDim m_tBits