pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

fpspreadsheet: Refactor TsCryptoInfo record.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5788 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2017-03-05 12:25:29 +00:00
parent ffceb1932b
commit 6126788bec
5 changed files with 101 additions and 43 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
components/fpspreadsheet/source/common/fpsutils.pas
View File

@@ -2085,8 +2085,8 @@ end;
-------------------------------------------------------------------------------}
procedure InitCryptoInfo(out AValue: TsCryptoInfo);
begin
AValue.Password := '';
AValue.AlgorithmName := '';
AValue.PasswordHash := '';
AValue.Algorithm := caUnknown;
AValue.HashValue := '';
AValue.SaltValue := '';
AValue.SpinCount := 0;