id	summary	reporter	owner	description	type	status	milestone	component	version	severity	resolution	keywords	cc
566	Error Helpfile Sample-Script, Appendix @OSLang Values	Polyphem	Valik	"Sample not working, should be:



MsgBox(0, ""Your OS Language:"", _Language())

Func _Language()
Select
    Case StringInStr(""0413,0813"", @OSLang)
        Return ""Dutch""

    Case StringInStr(""0409,0809,0c09,1009,1409,1809,1c09,2009,"" _
                   & ""2409,2809,2c09,3009,3409"", @OSLang)
        Return ""English""

    Case StringInStr(""040c,080c,0c0c,100c,140c,180c"", @OSLang)
        Return ""French""

    Case StringInStr(""0407,0807,0c07,1007,1407"", @OSLang)
        Return ""German""

    Case StringInStr(""0410,0810"", @OSLang)
        Return ""Italian""

    Case StringInStr(""0414,0814"", @OSLang)
        Return ""Norwegian""

    Case StringInStr(""0415"", @OSLang)
        Return ""Polish""

    Case StringInStr(""0416,0816"", @OSLang)
        Return ""Portuguese""

    Case StringInStr(""040a,080a,0c0a,100a,140a,180a,1c0a,200a,"" _
                   & ""240a,280a,2c0a,300a,340a,380a,3c0a,400a,"" _
                   & ""440a,480a,4c0a,500a"", @OSLang)
        Return ""Spanish""

    Case StringInStr(""041d,081d"", @OSLang)
        Return ""Swedish""

    Case Else
        Return ""Other (can't determine with @OSLang directly)""

    EndSelect
EndFunc"	Bug	closed	3.2.13.8	Documentation	3.2.12.0	None	Fixed