paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-15 19:29:09 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Deprecate XMLREG version of reginiflile

Browse Source 
git-svn-id: trunk@41797 -
This commit is contained in:
michael 2019-03-26 21:25:47 +00:00
parent c6276ab42e
commit efd77fdc92
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
packages/fcl-registry/src/registry.pp
View File

@ -230,7 +230,7 @@ type
property FileName: String read fFileName; property FileName: String read fFileName;
property PreferStringValues: Boolean read fPreferStringValues property PreferStringValues: Boolean read fPreferStringValues
write fPreferStringValues; write fPreferStringValues;
end; end{$ifdef XMLREG}deprecated 'Use TRegistry instead. Will be removed in 4.0'{$endif} platform;
{ --------------------------------------------------------------------- { ---------------------------------------------------------------------
TRegIniFile TRegIniFile
@ -265,7 +265,7 @@ type
procedure UpdateFile; override; procedure UpdateFile; override;
function ValueExists(const Section, Ident: string): Boolean; override; function ValueExists(const Section, Ident: string): Boolean; override;
property RegIniFile: TRegIniFile read FRegIniFile; property RegIniFile: TRegIniFile read FRegIniFile;
end; end{$ifdef XMLREG}deprecated 'Use TRegistry instead. Will be removed in 4.0'{$endif} platform;
ResourceString ResourceString
SInvalidRegType = 'Invalid registry data type: "%s"'; SInvalidRegType = 'Invalid registry data type: "%s"';