IPicInfo_Size [Get]

 150 Private Property Get IPicInfo_Size() As TPicSize
 151 ' Returns picture width and height in pixels
 152 
 153 Select Case BMPType
 154     Case bmpCoreHeader
 155         IPicInfo_Size.Width = CoreHeader.bcWidth
 156         IPicInfo_Size.Height = CoreHeader.bcHeight
 157     Case bmpInfoHeader
 158         IPicInfo_Size.Width = InfoHeader.biWidth
 159         IPicInfo_Size.Height = InfoHeader.biHeight
 160 End Select
 161 
 162 End Property
 163 
 164 
 165 

Called by