将选择结果通过INI记忆
下面是SQL代码
var
aIni:TIniFile;
begin
aIni.WriteBool("季节","12TS",True);//这样来写入
end;
var
aIni:TIniFile;
b:bool;
AllSections:TStringList;
KeyofSection:TStringList;
begin
aIni.ReadSections(AllSections);
aIni.ReadSection("季节",KeyofSection);
b=aIni.WriteBool("季节","12TS",false);
end;