変更は許可されていません
\n')
end
item=mg.get_var(post or mg.request_info.query_string,'item') or ''
itemList=EnumPlugInFileName(mode==1 and 'RecName' or 'Write')
setting=nil
for i,v in ipairs(itemList) do
if v==item then
f=edcb.io.open(EdcbModulePath()..(mode==1 and '\\RecName\\' or '\\Write\\')..v,'rb')
if f then
--埋め込まれた設定ファイルについてのメタ情報を取り出す
buf=(' '):rep(65536)
while #buf==65536 do
buf=buf..(f:read(65536) or '')
setting=buf:match('%[(%["setting%-59c4d329%-ba81%-4054%-9f4d%-d1900653338a",.-)%[""%]%]')
if setting then
setting=ParseSettingArrays(setting:gsub('%c',''))
break
end
buf=buf:sub(65537)
end
f:close()
end
break
end
end
if post and setting then
if setting.head.utf then
--設定ファイルがまだないか空のときバイト順マークを書き込む
f=edcb.io.open(EdcbModulePath()..(mode==1 and '\\RecName\\' or '\\Write\\')..item..'.ini','ab')
if f then
if f:seek('end')==0 then
f:write('\xff\xfe')
end
f:close()
end
end
for i,v in ipairs(setting.body) do
if v.section and mg.get_var(post,'k-'..i)=='['..v.section..']'..v.key then
val=GetVarInt(post,'c-'..i)==1
if type(v.def)=='number' then
val=math.min(math.max(val and GetVarInt(post,'v-'..i) or 0,v.min),v.max)
elseif type(v.def)=='string' then
val=(val and mg.get_var(post,'v-'..i) or ''):gsub('%c','')
end
edcb.WritePrivateProfile(v.section,v.key,val,(mode==1 and 'RecName\\' or 'Write\\')..item..'.ini')
end
end
ct:Append('変更しました
\n')
end
edcb.htmlEscape=15
ct:Append([=[
]=])
if setting then
ct:Append([=[
【]=]..EdcbHtmlEscape(setting.head.desc)..[=[】