[Lazarus] Cross-platform using TRegistry - how to?

Rolf Wetjen rolf.wetjen at mail.de
Mon May 4 09:22:00 CEST 2020


Hi Bo,

looking into xregreg.inc:

procedure TRegistry.SysRegCreate;
var s : string;
begin
   s:=includetrailingpathdelimiter(GetAppConfigDir(GlobalXMLFile));
   ForceDirectories(s);
   FSysData:=TXMLRegistryInstance.GetXMLRegistry(s+XFileName);
   TXmlRegistry(FSysData).AutoFlush:=False;
end;

It's stored in a xml file.

Rolf


-- 
Diese E-Mail wurde von Avast Antivirus-Software auf Viren geprüft.
https://www.avast.com/antivirus



More information about the lazarus mailing list