论坛 › 已解决问题区 › @OSVersion问题[已解决]

bhffhzh 发表于 2012-2-5 18:15:51

@OSVersion问题[已解决]

本帖最后由 bhffhzh 于 2012-2-8 13:39 编辑

@OSVersion 读取出来
能否达到这样的效果。



现在读出来：



太丑了。

nmgwddj 发表于 2012-2-5 18:49:59

win7头一次看到有sp3版本。

netegg 发表于 2012-2-5 19:12:15

本帖最后由 netegg 于 2012-2-5 19:15 编辑

回复 2# nmgwddj
他那个前面是xp
lz，这个有什么用吗，xp和7的系统控制面板都不一样，你以为那么简单就蒙的了人吗
还有，lz到底什么意思，是要7那种样式吗，那个自己去做不就完了

nmgwddj 发表于 2012-2-5 19:12:57

{:face (361):}看错了。

pp648852 发表于 2012-2-5 20:15:36

回复 1# bhffhzh


    这个很简单，你创建标签，再修改标签就可以了！
把基础先学好吧，好看不好看以后再学！

80ren 发表于 2012-2-5 21:00:24

看错了。....

jsgh1983 发表于 2012-2-6 00:30:35

   Local $Osversion = @OSVersion
                Switch $Osversion
                Case "WIN_2008R2"
                        GUICtrlSetData($Label6, "Microsoft Windows 2008R2")
                Case "WIN_7"
                        GUICtrlSetData($Label6, "Microsoft Windows 7")
                Case "WIN_2008"
                        GUICtrlSetData($Label6, "Microsoft Windows 2008")
                Case "WIN_VISTA"
                        GUICtrlSetData($Label6, "Microsoft Windows Vista")
                Case "WIN_2003"
                        GUICtrlSetData($Label6, "Microsoft Windows 2003")
                Case "WIN_XP"
                        GUICtrlSetData($Label6, "Microsoft Windows XP")
                Case "WIN_XPe"
                        GUICtrlSetData($Label6, "Microsoft Windows XPE")
                Case "WIN_2000"
                        GUICtrlSetData($Label6, "Microsoft Windows 2000")

netegg 发表于 2012-2-6 09:14:33

别扯了，win7系统属性和xp的系统属性界面都不一样

epac 发表于 2012-2-7 16:20:43

判断@OSversion的值、然后再 进行变量赋值 不是很简单么……

skyfree 发表于 2012-2-7 22:18:34

_Main()
Exit

Func _Main()
        Local $OsName = _GetOsName()
        MsgBox(0, "", $OsName)
EndFunc   ;==>_Main

Func _GetOsName()
        Local $Os = StringReplace(@OSVersion, "WIN_", "Microsoft Windows ")
        Local $Edition = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion", "EditionID")

        Local $OsName
        If $Edition <> "" Then
                $OsName = $Os & " " & $Edition
        Else
                $OsName = $Os
        EndIf

        Return $OsName
EndFunc   ;==>_GetOsName

bhffhzh 发表于 2012-2-8 13:36:18

感谢楼上各位的解答

那片叶子 发表于 2012-2-8 22:06:49

很不错，学习一下，以备后用

zdpcc 发表于 2012-2-10 19:56:12

这个学习一下，谢谢skyfree 老大

zyfzyj 发表于 2012-2-11 09:38:18

学习了！！！！

查看完整版本: @OSVersion问题[已解决]