//保存设置
procedure TForm1.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
cxGridView_ClassList.StoreToIniFile(ExtractFilePath(Paramstr(0))+'Config/ChooseClass.ini');
end;
//读取设置
procedure TForm1.FormShow(Sender: TObject);
begin
Self.cxGridView_ClassList.RestoreFromIniFile(ExtractFilePath(Paramstr(0))+'Config/ChooseClass.ini');
end;
procedure TForm1.FormClose(Sender: TObject;
var Action: TCloseAction);
begin
cxGridView_ClassList.StoreToIniFile(ExtractFilePath(Paramstr(0))+'Config/ChooseClass.ini');
end;
//读取设置
procedure TForm1.FormShow(Sender: TObject);
begin
Self.cxGridView_ClassList.RestoreFromIniFile(ExtractFilePath(Paramstr(0))+'Config/ChooseClass.ini');
end;