Home Explore Help
Sign In
pascal
/
freepascal.compiler
mirror of https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Files Issues 0 Wiki
Browse Source

* add deprecated to a call with a message about subsitute.

marcoonthegit 3 weeks ago
parent
c307108748
commit
9f9c546494
1 changed files with 1 additions and 1 deletions
Split View Show Diff Stats
  1. 1 1
      packages/winunits-base/src/shlwapi.pp

+ 1 - 1
packages/winunits-base/src/shlwapi.pp
View File 

@@ -763,7 +763,7 @@ const
 
   function SHRegGetValueW(hKey:HKEY; pszSubKey:LPCWSTR; pszValue:LPCWSTR; srrfFlags:SRRF; pdwType:PDWORD;
 
              pvData:pointer; pcbData:PDWORD):LSTATUS;stdcall;external SHLWAPIDLL name 'SHRegGetValueW';
 
   function SHRegSetValue(hkey:HKEY; pszSubKey:LPCWSTR; pszValue:LPCWSTR; srrfFlags:SRRF; dwType:DWORD;
 
-             pvData:LPCVOID; cbData:DWORD):LSTATUS;stdcall;external SHLWAPIDLL name 'SHRegSetValue';
 
+             pvData:LPCVOID; cbData:DWORD):LSTATUS;deprecated 'Since at least W7, use RegSetValue' ; stdcall; external SHLWAPIDLL name 'SHRegSetValue';
 
 
   function SHRegGetValueFromHKCUHKLM(pwszKey:PCWSTR; pwszValue:PCWSTR; srrfFlags:SRRF; pdwType:PDWORD; pvData:pointer;
 
              pcbData:PDWORD):LSTATUS;stdcall;external SHLWAPIDLL name 'SHRegGetValueFromHKCUHKLM';