DBGRIDEH格式保存/恢复

最新推荐文章于 2021-07-12 13:58:51 发布

hnxxcxg

最新推荐文章于 2021-07-12 13:58:51 发布

阅读量950

点赞数

CC 4.0 BY-SA版权

文章标签： ini

本文链接：https://blog.youkuaiyun.com/hnxxcxg/article/details/2292591

本文介绍了一种使用Delphi的TDBGridEh组件来保存和恢复网格布局的方法。通过简单的代码示例展示了如何根据用户设置保存网格的列索引、宽度、可见性和排序标记等布局信息到.ini文件中，并在需要时从文件恢复这些设置。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

procedure TFrmColSelect.SaveGridLayOut;
var
Ini: TIniFile;
begin
if CheckBox1.Checked then
    Grid.SaveGridLayoutIni(ExtractFilePath(Application.ExeName) + '/Grid.ini',
      Owner.ClassName + '$' + Name, true)
else
begin
    Ini := TIniFile.Create(ExtractFilePath(Application.ExeName) + '/Grid.ini');
    try
      Ini.EraseSection(Grid.Owner.ClassName + '$' + Grid.Name);
    finally
      Ini.Free;
    end;
end;
end;

procedure RestoreGridLayOut(AGrid:TDBGridEh);
var
RestoreParams:TDBGridEhRestoreParams;
begin
RestoreParams:=[grpColIndexEh,grpColWidthsEh,grpSortMarkerEh,
    grpColVisibleEh,grpRowHeightEh];
with AGrid do
    RestoreGridLayoutIni(ExtractFilePath(Application.ExeName) + '/Grid.ini',
      Owner.ClassName + '$' + Name,RestoreParams);
end;