Dim cloudfadeout As Integer For Each k As String In IO.File.ReadLines(dir + "\My Games\Skyrim\SkyrimPrefs.ini") If k.Contains("fCloudNearFadeDistance=") Then Dim values() As String = k.Split(CChar("=")) cloudfadeout = Convert.ToInt32(values(1)) End If Next Form2.TrackBar6.Value = cloudfadeout
cloudfadeout = Convert.ToInt32(Convert.ToDecimal(values(1).Replace(".",",")))
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)