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

OnGuard: Replace in all demo projects .lrs resource by .res resource. Less hints and warnings.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8724 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2023-02-20 17:36:51 +00:00
parent 91b3ac7ce0
commit e456d87021
100 changed files with 824 additions and 2317 deletions
Download Patch File Download Diff File Expand all files Collapse all files

41
components/onguard/examples/exselect/exselec1.lrs
View File

@ -1,41 +0,0 @@
{ This is an automatically generated lazarus resource file }
LazarusResources.Add('TForm1','FORMDATA',[
'TPF0'#6'TForm1'#5'Form1'#4'Left'#3#31#1#6'Height'#3#18#1#3'Top'#2'f'#5'Width'
+#3'q'#1#18'HorzScrollBar.Page'#3'p'#1#18'VertScrollBar.Page'#3#249#0#8'AutoS'
+'ize'#9#7'Caption'#6#10'ExSelect: '#12'ClientHeight'#3#18#1#11'ClientWidth'#3
+'q'#1#4'Menu'#7#9'MainMenu1'#8'OnCreate'#7#10'FormCreate'#10'LCLVersion'#6#7
+'2.3.0.0'#0#7'TButton'#9'ModifyBtn'#22'AnchorSideLeft.Control'#7#5'Owner'#19
+'AnchorSideLeft.Side'#7#9'asrCenter'#21'AnchorSideTop.Control'#7#4'Info'#18
+'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3#128#0#6'Height'#2#25#3'Top'#3
+#227#0#5'Width'#2'q'#20'BorderSpacing.Bottom'#2#16#25'BorderSpacing.InnerBor'
+'der'#2#4#7'Caption'#6#15'Modify Features'#7'Enabled'#8#7'OnClick'#7#14'Modi'
+'fyBtnClick'#8'TabOrder'#2#0#0#0#6'TLabel'#4'Info'#22'AnchorSideLeft.Control'
+#7#5'Owner'#21'AnchorSideTop.Control'#7#5'Owner'#23'AnchorSideRight.Control'
+#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#2#16#6'Height'#3
+#195#0#3'Top'#2#16#5'Width'#3'Q'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRigh'
+'t'#0#20'BorderSpacing.Around'#2#16#7'Caption'#12'!'#2#0#0'This example uses'
+' the TOgUsageCode and the TOgSpecialCode components to implement a limited '
+'use "demo" application which allows only the required features. '#13#10#13
+#10'The program can be run 3 times and then a special code must be obtained'
+' to register the program and to enable various features. '#13#10#13#10'A ma'
+'chine modifier is used to prevent the application from being copied and run'
+' on another machine. To obtain the release release code you need to run th'
+'e companion example EXSLCODE. The release codes will be stored in a data fi'
+'le called EXSELECT.DAT'#5'Color'#7#6'clAqua'#11'ParentColor'#8#8'WordWrap'#9
+#0#0#9'TMainMenu'#9'MainMenu1'#4'Left'#2'('#3'Top'#3#200#0#0#9'TMenuItem'#12
+'FeaturesMenu'#7'Caption'#6#8'Features'#0#9'TMenuItem'#16'FeaturesRequired'#7
+'Caption'#6#8'Required'#7'Checked'#9#0#0#9'TMenuItem'#12'FeaturesHelp'#7'Cap'
+'tion'#6#4'Help'#7'Enabled'#8#0#0#9'TMenuItem'#16'FeaturesExamples'#7'Captio'
+'n'#6#8'Examples'#7'Enabled'#8#0#0#9'TMenuItem'#16'FeaturesDatabase'#7'Capti'
+'on'#6#8'Database'#7'Enabled'#8#0#0#9'TMenuItem'#11'FeaturesFax'#7'Caption'#6
+#3'Fax'#7'Enabled'#8#0#0#9'TMenuItem'#15'FeaturesGoodies'#7'Caption'#6#7'Goo'
+'dies'#7'Enabled'#8#0#0#0#0#12'TOgUsageCode'#12'OgUsageCode1'#9'AutoCheck'#8
+#9'OnChecked'#7#19'OgUsageCode1Checked'#8'OnGetKey'#7#18'OgUsageCode1GetKey'
+#9'OnGetCode'#7#19'OgUsageCode1GetCode'#12'AutoDecrease'#8#12'OnChangeCode'#7
+#22'OgUsageCode1ChangeCode'#4'Left'#3#168#0#3'Top'#2'0'#0#0#14'TOgSpecialCod'
+'e'#14'OgSpecialCode1'#9'AutoCheck'#8#9'OnChecked'#7#21'OgSpecialCode1Checke'
+'d'#8'OnGetKey'#7#20'OgSpecialCode1GetKey'#9'OnGetCode'#7#21'OgSpecialCode1G'
+'etCode'#13'OnGetModifier'#7#25'OgSpecialCode1GetModifier'#4'Left'#3#168#0#3
+'Top'#2#16#0#0#0
]);

9
components/onguard/examples/exselect/exselec1.pas
View File

@ -21,8 +21,8 @@ unit Exselec1;
interface
uses
SysUtils, Classes, Controls, Forms, Dialogs,
StdCtrls, OnGuard, OgUtil, Menus,Buttons,LResources;
SysUtils, Classes, Controls, Forms, Dialogs, StdCtrls, Menus, Buttons,
OnGuard, OgUtil;
type
@ -65,7 +65,7 @@ var
implementation
{$R *.lfm}
const
{ The key was created by a separate program (CODEGEN) and is generic
@ -324,7 +324,4 @@ begin
end;
end;
initialization
{$i exselec1.lrs}
end.

14
components/onguard/examples/exselect/exselect.lpi
View File

@ -58,8 +58,8 @@
<ResourceBaseClass Value="Form"/>
<UnitName Value="Exselec1"/>
<IsVisibleTab Value="True"/>
<TopLine Value="290"/>
<CursorPos X="49" Y="310"/>
<TopLine Value="94"/>
<CursorPos X="11" Y="68"/>
<UsageCount Value="20"/>
<Loaded Value="True"/>
<LoadedDesigner Value="True"/>
@ -70,7 +70,7 @@
<UsageCount Value="10"/>
</Unit2>
</Units>
<JumpHistory Count="2" HistoryIndex="1">
<JumpHistory Count="4" HistoryIndex="3">
<Position1>
<Filename Value="exselec1.pas"/>
<Caret Line="300" Column="22" TopLine="290"/>
@ -79,6 +79,14 @@
<Filename Value="exselec1.pas"/>
<Caret Line="299" Column="22" TopLine="289"/>
</Position2>
<Position3>
<Filename Value="exselec1.pas"/>
<Caret Line="325" Column="25" TopLine="289"/>
</Position3>
<Position4>
<Filename Value="exselec1.pas"/>
<Caret Line="327" TopLine="291"/>
</Position4>
</JumpHistory>
</ProjectOptions>
<CompilerOptions>