ucGridPlus

[LeandroA]

Hello, Leandro, greate work! I try to use your control in my new project and found strange behavior. When setting scrollbars theme to "sThemed", in IDE scrollbars look as expected, but after compiling they became unthemed. I attached two images, first one is your compiled example, second one is mine, as you can see left tree has themed scrollbars (app has manifest).

Hello Thanks for reporting, I had not paid much attention to the scroll code, there are some things to correct so I put this error is due to a bad verification of the version of the OS, you can correct this by commenting the following line inside the pvCheckEnvironment routine of usercontrol ucScrollbar "'If (.dwMinorVersion > 0) Then"

the routine should be like this

Private Sub pvCheckEnvironment()
    'modified by Jason James Newland 2007
    Dim uOSV As OSVERSIONINFO
    '
    m_bIsXP = False
    m_bIsLuna = False
    
    With uOSV
        .dwOSVersionInfoSize = Len(uOSV)
        Call GetVersionEx(uOSV)
        Form1.Caption = .dwMinorVersion
        If (.dwPlatformId = 2) Then
            If (.dwMajorVersion >= 5) Then    ' NT based
                'If (.dwMinorVersion > 0) Then ' XP
                    m_bIsXP = True
                    m_bIsLuna = pvIsLuna()
                'End If
            End If
        End If
    End With
    
End Sub

In the next version I will also remove this check since this grid would not work on OS prior to Win XP