OnGuard: Fix usage of incorrect datecode in exdtp21 sample project.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8816 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2023-04-28 23:25:39 +00:00
parent 8e3014d9ab
commit 8af88d6531
4 changed files with 4 additions and 7 deletions

View File

@ -1,3 +1,2 @@
[Codes]
DateCode=049CF7F37E44F6C6
DateCode=A9A02ECB8535EBCE1127

View File

@ -48,7 +48,7 @@ object Form1: TForm1
Width = 204
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 12
Caption = 'If you can edit this, your program was allowed to run'
Caption = 'If you can see this, your program was allowed to run.'
WordWrap = True
OnDblClick = InfoDblClick
end
@ -70,7 +70,6 @@ object Form1: TForm1
OnChecked = OgDateCode1Checked
OnGetKey = OgDateCode1GetKey
OnGetCode = OgDateCode1GetCode
StoreCode = True
Left = 168
Top = 72
end

View File

@ -12,8 +12,7 @@ uses
OnGuard, OgUtil;
const
CKey : TKey = ($E5,$8F,$84,$D6,$92,$C9,$A4,$D8,
$1A,$FA,$6F,$8D,$AB,$FC,$DF,$B4);
CKey : TKey = ($E5,$8F,$84,$D6,$92,$C9,$A4,$D8,$1A,$FA,$6F,$8D,$AB,$FC,$DF,$B4);
type

View File

@ -1,2 +1,2 @@
[Codes]
DaysCode=B6DA5EECDE3C13ECB826
DaysCode=FD6BE770F2BBBD68FC26