1
Vote

Bugs in Example Files on GPS Diagnostics CF (VB.NET)

description

Hi, Issues I've noticed on trying the Diagnostics Example Project in VS 2005 VB.
 
1.................
On starting the Application for the first time Resource Errors occur where trying to load the Warning Images.
 
    Friend ReadOnly Property WarningImage() As System.Drawing.Bitmap
        Get
            Dim obj As Object = ResourceManager.GetObject("WarningShield", resourceCulture) 'In the downloaded it had WarningImage which doesn't corrispond to anything where WarningShield did.
            Return CType(obj,System.Drawing.Bitmap)
        End Get
    End Property

    Friend ReadOnly Property ErrorImage() As System.Drawing.Bitmap
        Get
            Dim obj As Object = ResourceManager.GetObject("Problem", resourceCulture) 'In the downloaded it had Error which doesn't corrispond to anything where Problem did.
            Return CType(obj,System.Drawing.Bitmap)
        End Get
    End Property
 
2..................
in DeviceForm.vb when detecting what features are aviable to the GPS Device I couldn't get a result to what I know the device supports..
 
I've changed rows 214 to 239 to this which now correctly detects the supported sentances
 
            ' What features are supported?
            isPositionSupported = isPositionSupported OrElse (TypeOf sentence Is IPositionSentence)
 
            isAltitudeSupported = isAltitudeSupported OrElse (TypeOf sentence Is IAltitudeSentence)
 
            isBearingSupported = isBearingSupported OrElse (TypeOf sentence Is IBearingSentence)
 
            isPrecisionSupported = isPrecisionSupported OrElse (TypeOf sentence Is IHorizontalDilutionOfPrecisionSentence)
 
            isSpeedSupported = isSpeedSupported OrElse (TypeOf sentence Is ISpeedSentence)
 
            isSatellitesSupported = isSatellitesSupported OrElse (TypeOf sentence Is ISatelliteCollectionSentence)
 
            ' Is everything supported?  If so, we have a healthy GPS device.  It's okay to exit
            If isPositionSupported AndAlso isAltitudeSupported AndAlso isBearingSupported AndAlso isPrecisionSupported AndAlso isSatellitesSupported AndAlso isSpeedSupported Then
                Exit For
            End If

comments