3 replies to this topic

[Jordan]

If the LoadFromRegistry does not find the registry keys, it uses default values, and those values might override values established at design time (especially column visibility). It would be useful to have a "RegistryEntriesFound" function that could test the registry to determine whether a SaveToRegistry had already been performed, so that LoadFromRegistry could be skipped or aborted if previously saved information is not present.

For my application, I frequently have columns that are invisible, and if I perform a LoadFromRegistry prior to SaveToRegistry, I lose the invisibility status of those columns.

Using the "SectionExists" method of the tCustomIniFile might be an appropriate way to perform this test.

[Jordan]

I tried this test code for the function I suggested and it worked fine for what I needed:

CODE

function tNXCustomGridControl.SavedDataExists(const KeyName: WideString;
                                              ID: string): boolean;
var
  IniFile: TRegistryIniFile;
begin
  try
    IniFile := TRegistryIniFile.Create(KeyName);
    Result := IniFile.SectionExists('Common' + ID);
  finally
    FreeAndNil(IniFile);
  end;
end;

[Boki (Berg)]

Hello Jordan,

Can you please use this function if not a problem, inside your unit. Thank you.

Best regards

[Jordan]

Hello Jordan,

Can you please use this function if not a problem, inside your unit. Thank you.

Best regards

No problem...it's working fine for me as described.