Delphi DBGridEh保存表格调整到ini文件中

该段代码实现了一个名为DBGridEhConfigIni的函数,用于在关闭和打开窗口时保存和恢复DBGridEh组件的布局。当CallType为0时,它会将DBGridEh的列索引、宽度、排序标记、可见性和行高信息写入到指定目录的ini文件中;当CallType为1时,它从文件中读取这些信息并恢复DBGridEh的布局。这个功能确保了用户每次打开窗口时,DBGridEh显示的状态与上次关闭时一致。

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

打开窗口时还原上次关闭时DBGridEh的样子

procedure DBGridEhConfigIni(DBGEH:TDBGridEh;FormName:String;CallType:Byte);  
//关闭窗口时记录DBGridEh的调整  下次打开窗口时还原上次关闭时的样子 (uses DBGridEh)
var
  MyRestoreParams :TDBGridEhRestoreParams;
begin
  if CallType=0 then  //为0时写入 为1时读取
  begin
    if not DirectoryExists(ExtractFileDir(Application.Exename)+'\DBGridEhConfig') then   //创建文件夹
    begin
      ForceDirectories(ExtractFileDir(Application.Exename)+'\DBGridEhConfig');
    end;
    DBGEH.SaveGridLayoutIni(ExtractFileDir(Application.Exename)+'\DBGridEhConfig\'+FormName,DBGEH.ClassName,True);//写入文件
  end
  else
  begin
    MyRestoreParams :=[grpColIndexEh,grpColWidthsEh,grpSortMarkerEh,grpColVisibleEh,grpRowHeightEh];
    DBGEH.RestoreGridLayoutIni(ExtractFileDir(Application.Exename)+'\DBGridEhConfig\'+FormName,DBGEH.ClassName,MyRestoreParams);  //读取文件
  end;
end;
评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值