local tResolutions = {
{'ResX=640', 'ResY=480'},
{'ResX=720', 'ResY=480'},
{'ResX=800', 'ResY=600'},
{'ResX=848', 'ResY=480'},
{'ResX=1024', 'ResY=480'},
{'ResX=1152', 'ResY=768'},
{'ResX=1280', 'ResY=864'},
{'ResX=1280', 'ResY=720'},
{'ResX=1280', 'ResY=768'},
{'ResX=1280', 'ResY=800'},
{'ResX=1280', 'ResY=960'},
{'ResX=1360', 'ResY=1024'},
{'ResX=1440', 'ResY=900'},
{'ResX=1680', 'ResY=1050'},
{'ResX=1920', 'ResY=1080'}
};
local sFilePath1 = "AutoPlay\\Resolution1.ini";
local sFilePath2 = "AutoPlay\\Resolution2.ini";
local nSel = ComboBox.GetSelected("ComboBox1");
if (nSel ~= -1) then
local nData = String.ToNumber(ComboBox.GetItemData("ComboBox1", nSel));
if (nData ~= 0) then
local tLines1 = TextFile.ReadToTable(sFilePath1);
local tLines2 = TextFile.ReadToTable(sFilePath2);
if tLines1 and tLines2 then
tLines1[741] = tResolutions[nData][1];
tLines1[742] = tResolutions[nData][2];
tLines2[741] = tResolutions[nData][1];
tLines2[742] = tResolutions[nData][2];
TextFile.WriteFromTable(sFilePath1, tLines1, false);
TextFile.WriteFromTable(sFilePath2, tLines2, false);
end
end
end |
Дружественная тема в Варезнике
А на то, которое выше. 
