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

OnGuard: Fix compilation back to Laz 1.4.4/FPC 2.6.4 (oldest one tested). Move TOgModifierProperty in unit ogreg.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8718 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2023-02-19 22:58:04 +00:00
parent 2fa960756a
commit 8a04d28a5a
6 changed files with 147 additions and 162 deletions
Download Patch File Download Diff File Expand all files Collapse all files

88
components/onguard/examples/codegen/codegen.lpi
View File

@ -1,14 +1,13 @@
<?xml version="1.0" encoding="UTF-8"?> <?xml version="1.0" encoding="UTF-8"?>
<CONFIG> <CONFIG>
<ProjectOptions> <ProjectOptions>
<Version Value="12"/> <Version Value="10"/>
<PathDelim Value="\"/> <PathDelim Value="\"/>
<General> <General>
<Flags> <Flags>
<LRSInOutputDirectory Value="False"/> <LRSInOutputDirectory Value="False"/>
<CompatibilityMode Value="True"/>
</Flags> </Flags>
<Scaled Value="True"/> <MainUnit Value="0"/>
<UseXPManifest Value="True"/> <UseXPManifest Value="True"/>
</General> </General>
<BuildModes Count="1"> <BuildModes Count="1">
@ -20,16 +19,9 @@
</PublishOptions> </PublishOptions>
<RunParams> <RunParams>
<local> <local>
<LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T &apos;Lazarus Run Output&apos; -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/> <FormatVersion Value="1"/>
<LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T 'Lazarus Run Output' -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
</local> </local>
<FormatVersion Value="2"/>
<Modes Count="1">
<Mode0 Name="default">
<local>
<LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T &apos;Lazarus Run Output&apos; -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
</local>
</Mode0>
</Modes>
</RunParams> </RunParams>
<RequiredPackages Count="2"> <RequiredPackages Count="2">
<Item1> <Item1>
@ -45,7 +37,8 @@
<Filename Value="codegen.lpr"/> <Filename Value="codegen.lpr"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<UnitName Value="CodeGen"/> <UnitName Value="CodeGen"/>
<CursorPos X="73" Y="15"/> <IsVisibleTab Value="True"/>
<CursorPos X="27" Y="9"/>
<UsageCount Value="28"/> <UsageCount Value="28"/>
<Loaded Value="True"/> <Loaded Value="True"/>
<LoadedDesigner Value="True"/> <LoadedDesigner Value="True"/>
@ -124,9 +117,8 @@
</Unit9> </Unit9>
<Unit10> <Unit10>
<Filename Value="..\..\source\onguard.pas"/> <Filename Value="..\..\source\onguard.pas"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="5"/> <EditorIndex Value="5"/>
<TopLine Value="922"/> <TopLine Value="913"/>
<CursorPos X="6" Y="940"/> <CursorPos X="6" Y="940"/>
<UsageCount Value="11"/> <UsageCount Value="11"/>
<Loaded Value="True"/> <Loaded Value="True"/>
@ -244,7 +236,7 @@
<Loaded Value="True"/> <Loaded Value="True"/>
</Unit25> </Unit25>
</Units> </Units>
<JumpHistory Count="30" HistoryIndex="29"> <JumpHistory Count="29" HistoryIndex="28">
<Position1> <Position1>
<Filename Value="..\..\source\qonguard2.pas"/> <Filename Value="..\..\source\qonguard2.pas"/>
<Caret Line="504" Column="3" TopLine="500"/> <Caret Line="504" Column="3" TopLine="500"/>
@ -266,104 +258,100 @@
</Position5> </Position5>
<Position6> <Position6>
<Filename Value="..\..\source\ogfirst.pas"/> <Filename Value="..\..\source\ogfirst.pas"/>
<Caret Line="152" Column="16" TopLine="165"/> <Caret Line="69" Column="9" TopLine="50"/>
</Position6> </Position6>
<Position7> <Position7>
<Filename Value="..\..\source\ogfirst.pas"/> <Filename Value="..\..\source\ogfirst.pas"/>
<Caret Line="69" Column="9" TopLine="50"/> <Caret Line="86" Column="11" TopLine="55"/>
</Position7> </Position7>
<Position8> <Position8>
<Filename Value="..\..\source\ogfirst.pas"/> <Filename Value="..\..\source\ogfirst.pas"/>
<Caret Line="86" Column="11" TopLine="55"/> <Caret Line="97" Column="9" TopLine="78"/>
</Position8> </Position8>
<Position9> <Position9>
<Filename Value="..\..\source\ogfirst.pas"/> <Filename Value="..\..\source\ogfirst.pas"/>
<Caret Line="97" Column="9" TopLine="78"/> <Caret Line="152" Column="9" TopLine="133"/>
</Position9> </Position9>
<Position10> <Position10>
<Filename Value="..\..\source\ogfirst.pas"/> <Filename Value="..\..\source\ogproexe.pas"/>
<Caret Line="152" Column="9" TopLine="133"/> <Caret Line="675" Column="24" TopLine="643"/>
</Position10> </Position10>
<Position11> <Position11>
<Filename Value="..\..\source\ogproexe.pas"/> <Filename Value="..\..\source\ogproexe.pas"/>
<Caret Line="675" Column="24" TopLine="643"/> <Caret Line="262" Column="9" TopLine="243"/>
</Position11> </Position11>
<Position12> <Position12>
<Filename Value="..\..\source\ogproexe.pas"/> <Filename Value="..\..\source\ogproexe.pas"/>
<Caret Line="262" Column="9" TopLine="243"/> <Caret Line="377" Column="9" TopLine="358"/>
</Position12> </Position12>
<Position13> <Position13>
<Filename Value="..\..\source\ogproexe.pas"/> <Filename Value="..\..\source\ogproexe.pas"/>
<Caret Line="377" Column="9" TopLine="358"/> <Caret Line="532" Column="9" TopLine="513"/>
</Position13> </Position13>
<Position14> <Position14>
<Filename Value="..\..\source\ogproexe.pas"/> <Filename Value="..\..\source\ogproexe.pas"/>
<Caret Line="532" Column="9" TopLine="513"/> <Caret Line="663" Column="9" TopLine="644"/>
</Position14> </Position14>
<Position15> <Position15>
<Filename Value="..\..\source\ogproexe.pas"/> <Filename Value="..\..\source\ogsrmgr.pas"/>
<Caret Line="663" Column="9" TopLine="644"/> <Caret Line="482" Column="18" TopLine="456"/>
</Position15> </Position15>
<Position16> <Position16>
<Filename Value="..\..\source\ogsrmgr.pas"/> <Filename Value="..\..\source\ogsrmgr.pas"/>
<Caret Line="482" Column="18" TopLine="456"/> <Caret Line="100" Column="9" TopLine="81"/>
</Position16> </Position16>
<Position17> <Position17>
<Filename Value="..\..\source\ogsrmgr.pas"/> <Filename Value="..\..\source\ogsrmgr.pas"/>
<Caret Line="100" Column="9" TopLine="81"/> <Caret Line="142" Column="9" TopLine="123"/>
</Position17> </Position17>
<Position18> <Position18>
<Filename Value="..\..\source\ogsrmgr.pas"/> <Filename Value="..\..\source\ogsrmgr.pas"/>
<Caret Line="142" Column="9" TopLine="123"/> <Caret Line="190" Column="9" TopLine="172"/>
</Position18> </Position18>
<Position19> <Position19>
<Filename Value="..\..\source\ogsrmgr.pas"/> <Filename Value="..\..\source\ogsrmgr.pas"/>
<Caret Line="190" Column="9" TopLine="172"/> <Caret Line="228" Column="9" TopLine="209"/>
</Position19> </Position19>
<Position20> <Position20>
<Filename Value="..\..\source\ogsrmgr.pas"/> <Filename Value="..\..\source\ogsrmgr.pas"/>
<Caret Line="228" Column="9" TopLine="209"/> <Caret Line="482" Column="9" TopLine="456"/>
</Position20> </Position20>
<Position21> <Position21>
<Filename Value="..\..\source\ogsrmgr.pas"/> <Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="482" Column="9" TopLine="456"/> <Caret Line="55" Column="9" TopLine="36"/>
</Position21> </Position21>
<Position22> <Position22>
<Filename Value="..\..\source\ogutil.pas"/> <Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="545" Column="18" TopLine="690"/> <Caret Line="77" Column="11" TopLine="58"/>
</Position22> </Position22>
<Position23> <Position23>
<Filename Value="..\..\source\ogutil.pas"/> <Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="55" Column="9" TopLine="36"/> <Caret Line="304" Column="19" TopLine="288"/>
</Position23> </Position23>
<Position24> <Position24>
<Filename Value="..\..\source\ogutil.pas"/> <Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="77" Column="11" TopLine="58"/> <Caret Line="548" Column="9" TopLine="529"/>
</Position24> </Position24>
<Position25> <Position25>
<Filename Value="..\..\source\ogutil.pas"/> <Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="304" Column="19" TopLine="288"/> <Caret Line="847" Column="18" TopLine="831"/>
</Position25> </Position25>
<Position26> <Position26>
<Filename Value="..\..\source\ogutil.pas"/> <Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="548" Column="9" TopLine="529"/> <Caret Line="1159" Column="18" TopLine="1143"/>
</Position26> </Position26>
<Position27> <Position27>
<Filename Value="..\..\source\ogutil.pas"/> <Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="847" Column="18" TopLine="831"/> <Caret Line="1271" Column="6" TopLine="1247"/>
</Position27> </Position27>
<Position28> <Position28>
<Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="1159" Column="18" TopLine="1143"/>
</Position28>
<Position29>
<Filename Value="..\..\source\ogutil.pas"/>
<Caret Line="1271" Column="6" TopLine="1247"/>
</Position29>
<Position30>
<Filename Value="..\..\source\onguard.inc"/> <Filename Value="..\..\source\onguard.inc"/>
<Caret Line="50" Column="19" TopLine="31"/> <Caret Line="50" Column="19" TopLine="31"/>
</Position30> </Position28>
<Position29>
<Filename Value="codegen.lpr"/>
<Caret Line="15" Column="73"/>
</Position29>
</JumpHistory> </JumpHistory>
</ProjectOptions> </ProjectOptions>
<CompilerOptions> <CompilerOptions>

3
components/onguard/examples/codegen/codegen.lpr
View File

@ -6,6 +6,7 @@ program CodeGen;
uses uses
Interfaces, Interfaces,
LCLVersion,
Forms, Forms,
CodeGenU in 'CODEGENU.pas' {CodeGenFrm}, tponguard; CodeGenU in 'CODEGENU.pas' {CodeGenFrm}, tponguard;
@ -13,7 +14,9 @@ uses
{$R *.res} {$R *.res}
begin begin
{$IF LCL_FullVersion >= 3000000}
Application.Scaled:=True; Application.Scaled:=True;
{$ENDIF}
Application.Title:=''; Application.Title:='';
Application.Initialize; Application.Initialize;
Application.CreateForm(TCodeGenFrm, CodeGenFrm); Application.CreateForm(TCodeGenFrm, CodeGenFrm);

1
components/onguard/packages/tponguard.pas
View File

@ -4,7 +4,6 @@
unit tponguard; unit tponguard;
{$warn 5023 off : no warning about unused units}
interface interface
uses uses

2
components/onguard/source/ogreg.pas
View File

@ -44,7 +44,7 @@ procedure Register;
implementation implementation
uses uses
System.UITypes, Classes, Forms, Classes, Controls, Forms,
qogabout0, ogconst,ognetwrk, ogproexe, {AH.01} qogabout0, ogconst,ognetwrk, ogproexe, {AH.01}
onguard, {AH.01} onguard, {AH.01}
qonguard2, {AH.01} qonguard2, {AH.01}

4
components/onguard/source/qonguard2.lfm
View File

@ -380,9 +380,6 @@ object CodeGenerateFrm: TCodeGenerateFrm
Caption = '&Key used to encode' Caption = '&Key used to encode'
ClientHeight = 219 ClientHeight = 219
ClientWidth = 536 ClientWidth = 536
Color = clBtnFace
ParentBackground = False
ParentColor = False
TabOrder = 3 TabOrder = 3
object GenerateKeySb: TSpeedButton object GenerateKeySb: TSpeedButton
AnchorSideTop.Control = BlockKeyEd AnchorSideTop.Control = BlockKeyEd
@ -576,7 +573,6 @@ object CodeGenerateFrm: TCodeGenerateFrm
Caption = 'Generate Code' Caption = 'Generate Code'
ClientHeight = 47 ClientHeight = 47
ClientWidth = 536 ClientWidth = 536
ParentBackground = False
TabOrder = 4 TabOrder = 4
object RegCodeCopySb: TSpeedButton object RegCodeCopySb: TSpeedButton
AnchorSideTop.Control = GenerateBtn AnchorSideTop.Control = GenerateBtn

211
components/onguard/source/qonguard2.lrs
View File

@ -108,110 +108,109 @@ LazarusResources.Add('TCodeGenerateFrm','FORMDATA',[
+#23'AnchorSideRight.Control'#7#8'CodesNbk'#20'AnchorSideRight.Side'#7#9'asrB' +#23'AnchorSideRight.Control'#7#8'CodesNbk'#20'AnchorSideRight.Side'#7#9'asrB'
+'ottom'#4'Left'#2#6#6'Height'#3#239#0#3'Top'#3#142#0#5'Width'#3#28#2#7'Ancho' +'ottom'#4'Left'#2#6#6'Height'#3#239#0#3'Top'#3#142#0#5'Width'#3#28#2#7'Ancho'
+'rs'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#9#7'Caption'#6#19'&Key u' +'rs'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#9#7'Caption'#6#19'&Key u'
+'sed to encode'#12'ClientHeight'#3#219#0#11'ClientWidth'#3#24#2#5'Color'#7#9 +'sed to encode'#12'ClientHeight'#3#219#0#11'ClientWidth'#3#24#2#8'TabOrder'#2
+'clBtnFace'#16'ParentBackground'#8#11'ParentColor'#8#8'TabOrder'#2#3#0#12'TS' +#3#0#12'TSpeedButton'#13'GenerateKeySb'#21'AnchorSideTop.Control'#7#10'Block'
+'peedButton'#13'GenerateKeySb'#21'AnchorSideTop.Control'#7#10'BlockKeyEd'#18 +'KeyEd'#18'AnchorSideTop.Side'#7#9'asrCenter'#23'AnchorSideRight.Control'#7
+'AnchorSideTop.Side'#7#9'asrCenter'#23'AnchorSideRight.Control'#7#11'ModStri' +#11'ModStringEd'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#242#1#6'H'
+'ngEd'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#242#1#6'Height'#2#23 +'eight'#2#23#4'Hint'#6#12'Generate key'#3'Top'#3#180#0#5'Width'#2#23#7'Ancho'
+#4'Hint'#6#12'Generate key'#3'Top'#3#180#0#5'Width'#2#23#7'Anchors'#11#5'akT' +'rs'#11#5'akTop'#7'akRight'#0#10'Glyph.Data'#10'F'#1#0#0'B'#1#0#0'BMB'#1#0#0
+'op'#7'akRight'#0#10'Glyph.Data'#10'F'#1#0#0'B'#1#0#0'BMB'#1#0#0#0#0#0#0'v'#0 +#0#0#0#0'v'#0#0#0'('#0#0#0#17#0#0#0#17#0#0#0#1#0#4#0#0#0#0#0#204#0#0#0#0#0#0
+#0#0'('#0#0#0#17#0#0#0#17#0#0#0#1#0#4#0#0#0#0#0#204#0#0#0#0#0#0#0#0#0#0#0#0#0 +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#0#0#128#0#0#0#128#128#0#128#0#0#0
+#0#0#0#0#0#0#0#0#0#0#0#0#128#0#0#128#0#0#0#128#128#0#128#0#0#0#128#0#128#0 +#128#0#128#0#128#128#0#0#128#128#128#0#192#192#192#0#0#0#255#0#0#255#0#0#0
+#128#128#0#0#128#128#128#0#192#192#192#0#0#0#255#0#0#255#0#0#0#255#255#0#255 +#255#255#0#255#0#0#0#255#0#255#0#255#255#0#0#255#255#255#0#136#136#136#136
+#0#0#0#255#0#255#0#255#255#0#0#255#255#255#0#136#136#136#136#136#136#136#136 +#136#136#136#136#128#0#0#0#136#136#136#136#136#136#136#136#128#0#0#0#136#136
+#128#0#0#0#136#136#136#136#136#136#136#136#128#0#0#0#136#136#136#136#136#136 +#136#136#136#136#136#136#128#0#0#0#136#136#136#136#136#136#136#136#128#0#0#0
+#136#136#128#0#0#0#136#136#136#136#136#136#136#136#128#0#0#0#136#136#136#136 +#136#136#136#136#136#136#136#136#128#0#0#0#136#136#0#8#136#136#136#136#128#0
+#136#136#136#136#128#0#0#0#136#136#0#8#136#136#136#136#128#0#0#0#136#128#0#0 +#0#0#136#128#0#0#136#8#136#128#128#0#0#0#136#0#152#144#8#8#0#128#128#0#0#0
+#136#8#136#128#128#0#0#0#136#0#152#144#8#8#0#128#128#0#0#0#136#0#137#128#0#0 +#136#0#137#128#0#0#0#0#128#0#0#0#136#0#137#128#0#0#0#0#128#0#0#0#136#0#152
+#0#0#128#0#0#0#136#0#137#128#0#0#0#0#128#0#0#0#136#0#152#144#8#136#136#136 +#144#8#136#136#136#128#0#0#0#136#128#0#0#136#136#136#136#128#0#0#0#136#136#0
+#128#0#0#0#136#128#0#0#136#136#136#136#128#0#0#0#136#136#0#8#136#136#136#136 +#8#136#136#136#136#128#0#0#0#136#136#136#136#136#136#136#136#128#0#0#0#136
+#128#0#0#0#136#136#136#136#136#136#136#136#128#0#0#0#136#136#136#136#136#136 +#136#136#136#136#136#136#136#128#0#0#0#136#136#136#136#136#136#136#136#128#0
+#136#136#128#0#0#0#136#136#136#136#136#136#136#136#128#0#0#0#136#136#136#136 +#0#0#136#136#136#136#136#136#136#136#128#0#0#0#7'OnClick'#7#18'GenerateKeySb'
+#136#136#136#136#128#0#0#0#7'OnClick'#7#18'GenerateKeySbClick'#0#0#6'TLabel' +'Click'#0#0#6'TLabel'#6'Label1'#22'AnchorSideLeft.Control'#7#9'GroupBox1'#21
+#6'Label1'#22'AnchorSideLeft.Control'#7#9'GroupBox1'#21'AnchorSideTop.Contro' +'AnchorSideTop.Control'#7#11'ModStringEd'#18'AnchorSideTop.Side'#7#9'asrBott'
,'l'#7#11'ModStringEd'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#16#6'H' ,'om'#4'Left'#2#16#6'Height'#2#15#3'Top'#2'o'#5'Width'#2'0'#18'BorderSpacing.'
+'eight'#2#15#3'Top'#2'o'#5'Width'#2'0'#18'BorderSpacing.Left'#2#16#17'Border' +'Left'#2#16#17'BorderSpacing.Top'#2#16#7'Caption'#6#9'Modifier:'#11'ParentCo'
+'Spacing.Top'#2#16#7'Caption'#6#9'Modifier:'#11'ParentColor'#8#0#0#6'TLabel' +'lor'#8#0#0#6'TLabel'#6'Label5'#22'AnchorSideLeft.Control'#7#6'Label1'#21'An'
+#6'Label5'#22'AnchorSideLeft.Control'#7#6'Label1'#21'AnchorSideTop.Control'#7 +'chorSideTop.Control'#7#10'ModifierEd'#18'AnchorSideTop.Side'#7#9'asrBottom'
+#10'ModifierEd'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#16#6'Height' +#4'Left'#2#16#6'Height'#2#15#3'Top'#3#163#0#5'Width'#2#22#17'BorderSpacing.T'
+#2#15#3'Top'#3#163#0#5'Width'#2#22#17'BorderSpacing.Top'#2#12#7'Caption'#6#4 +'op'#2#12#7'Caption'#6#4'Key:'#11'ParentColor'#8#0#0#9'TCheckBox'#12'NoModif'
+'Key:'#11'ParentColor'#8#0#0#9'TCheckBox'#12'NoModifierCb'#22'AnchorSideLeft' +'ierCb'#22'AnchorSideLeft.Control'#7#9'GroupBox1'#21'AnchorSideTop.Control'#7
+'.Control'#7#9'GroupBox1'#21'AnchorSideTop.Control'#7#9'GroupBox1'#4'Left'#2 +#9'GroupBox1'#4'Left'#2#16#6'Height'#2#19#3'Top'#2#6#5'Width'#2'R'#18'Border'
+#16#6'Height'#2#19#3'Top'#2#6#5'Width'#2'R'#18'BorderSpacing.Left'#2#16#17'B' +'Spacing.Left'#2#16#17'BorderSpacing.Top'#2#6#7'Caption'#6#11'No modifier'#7
+'orderSpacing.Top'#2#6#7'Caption'#6#11'No modifier'#7'Checked'#9#7'OnClick'#7 +'Checked'#9#7'OnClick'#7#13'ModifierClick'#5'State'#7#9'cbChecked'#8'TabOrde'
+#13'ModifierClick'#5'State'#7#9'cbChecked'#8'TabOrder'#2#0#0#0#9'TCheckBox' +'r'#2#0#0#0#9'TCheckBox'#17'MachineModifierCb'#22'AnchorSideLeft.Control'#7
+#17'MachineModifierCb'#22'AnchorSideLeft.Control'#7#12'NoModifierCb'#19'Anch' +#12'NoModifierCb'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Co'
+'orSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#12'NoModifierCb' +'ntrol'#7#12'NoModifierCb'#4'Left'#3#146#0#6'Height'#2#19#3'Top'#2#6#5'Width'
+#4'Left'#3#146#0#6'Height'#2#19#3'Top'#2#6#5'Width'#2'p'#18'BorderSpacing.Le' +#2'p'#18'BorderSpacing.Left'#2'0'#7'Caption'#6#16'Machine modifier'#7'OnClic'
+'ft'#2'0'#7'Caption'#6#16'Machine modifier'#7'OnClick'#7#13'ModifierClick'#8 +'k'#7#13'ModifierClick'#8'TabOrder'#2#1#0#0#9'TCheckBox'#16'UniqueModifierCb'
+'TabOrder'#2#1#0#0#9'TCheckBox'#16'UniqueModifierCb'#22'AnchorSideLeft.Contr' +#22'AnchorSideLeft.Control'#7#17'MachineModifierCb'#19'AnchorSideLeft.Side'#7
+'ol'#7#17'MachineModifierCb'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'Ancho' +#9'asrBottom'#21'AnchorSideTop.Control'#7#12'NoModifierCb'#4'Left'#3'2'#1#6
+'rSideTop.Control'#7#12'NoModifierCb'#4'Left'#3'2'#1#6'Height'#2#19#3'Top'#2 +'Height'#2#19#3'Top'#2#6#5'Width'#2'h'#18'BorderSpacing.Left'#2'0'#7'Caption'
+#6#5'Width'#2'h'#18'BorderSpacing.Left'#2'0'#7'Caption'#6#15'Unique modifier' +#6#15'Unique modifier'#7'OnClick'#7#13'ModifierClick'#8'TabOrder'#2#2#0#0#9
+#7'OnClick'#7#13'ModifierClick'#8'TabOrder'#2#2#0#0#9'TCheckBox'#14'DateModi' +'TCheckBox'#14'DateModifierCb'#22'AnchorSideLeft.Control'#7#12'NoModifierCb'
+'fierCb'#22'AnchorSideLeft.Control'#7#12'NoModifierCb'#21'AnchorSideTop.Cont' +#21'AnchorSideTop.Control'#7#9'ModDateEd'#18'AnchorSideTop.Side'#7#9'asrCent'
+'rol'#7#9'ModDateEd'#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#16#6'He' +'er'#4'Left'#2#16#6'Height'#2#19#3'Top'#2''''#5'Width'#2'Z'#7'Caption'#6#13
+'ight'#2#19#3'Top'#2''''#5'Width'#2'Z'#7'Caption'#6#13'Date modifier'#7'OnCl' +'Date modifier'#7'OnClick'#7#13'ModifierClick'#8'TabOrder'#2#3#0#0#9'TCheckB'
+'ick'#7#13'ModifierClick'#8'TabOrder'#2#3#0#0#9'TCheckBox'#16'StringModifier' +'ox'#16'StringModifierCb'#22'AnchorSideLeft.Control'#7#12'NoModifierCb'#21'A'
+'Cb'#22'AnchorSideLeft.Control'#7#12'NoModifierCb'#21'AnchorSideTop.Control' +'nchorSideTop.Control'#7#11'ModStringEd'#18'AnchorSideTop.Side'#7#9'asrCente'
+#7#11'ModStringEd'#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#16#6'Heig' +'r'#4'Left'#2#16#6'Height'#2#19#3'Top'#2'J'#5'Width'#2'a'#7'Caption'#6#15'St'
+'ht'#2#19#3'Top'#2'J'#5'Width'#2'a'#7'Caption'#6#15'String Modifier'#7'OnCli' +'ring Modifier'#7'OnClick'#7#13'ModifierClick'#8'TabOrder'#2#4#0#0#5'TEdit'#9
+'ck'#7#13'ModifierClick'#8'TabOrder'#2#4#0#0#5'TEdit'#9'ModDateEd'#22'Anchor' +'ModDateEd'#22'AnchorSideLeft.Control'#7#17'MachineModifierCb'#21'AnchorSide'
+'SideLeft.Control'#7#17'MachineModifierCb'#21'AnchorSideTop.Control'#7#17'Ma' +'Top.Control'#7#17'MachineModifierCb'#18'AnchorSideTop.Side'#7#9'asrBottom'#4
+'chineModifierCb'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3#146#0#6'He' +'Left'#3#146#0#6'Height'#2#23#3'Top'#2'%'#5'Width'#2'b'#17'BorderSpacing.Top'
+'ight'#2#23#3'Top'#2'%'#5'Width'#2'b'#17'BorderSpacing.Top'#2#12#8'OnChange' +#2#12#8'OnChange'#7#13'ModifierClick'#10'OnKeyPress'#7#14'DateEdKeyPress'#8
+#7#13'ModifierClick'#10'OnKeyPress'#7#14'DateEdKeyPress'#8'TabOrder'#2#6#0#0 +'TabOrder'#2#6#0#0#5'TEdit'#11'ModStringEd'#22'AnchorSideLeft.Control'#7#9'M'
+#5'TEdit'#11'ModStringEd'#22'AnchorSideLeft.Control'#7#9'ModDateEd'#21'Ancho' +'odDateEd'#21'AnchorSideTop.Control'#7#9'ModDateEd'#18'AnchorSideTop.Side'#7
+'rSideTop.Control'#7#9'ModDateEd'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'A' +#9'asrBottom'#23'AnchorSideRight.Control'#7#9'GroupBox1'#20'AnchorSideRight.'
+'nchorSideRight.Control'#7#9'GroupBox1'#20'AnchorSideRight.Side'#7#9'asrBott' +'Side'#7#9'asrBottom'#4'Left'#3#146#0#6'Height'#2#23#3'Top'#2'H'#5'Width'#3
+'om'#4'Left'#3#146#0#6'Height'#2#23#3'Top'#2'H'#5'Width'#3'w'#1#7'Anchors'#11 +'w'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#8#17'BorderS'
+#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#8#17'BorderSpacing.Top'#2#12#19 +'pacing.Top'#2#12#19'BorderSpacing.Right'#2#15#8'OnChange'#7#13'ModifierClic'
+'BorderSpacing.Right'#2#15#8'OnChange'#7#13'ModifierClick'#8'TabOrder'#2#8#0 +'k'#8'TabOrder'#2#8#0#0#5'TEdit'#10'ModifierEd'#22'AnchorSideLeft.Control'#7
+#0#5'TEdit'#10'ModifierEd'#22'AnchorSideLeft.Control'#7#6'Label1'#21'AnchorS' +#6'Label1'#21'AnchorSideTop.Control'#7#6'Label1'#18'AnchorSideTop.Side'#7#9
+'ideTop.Control'#7#6'Label1'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2 +'asrBottom'#4'Left'#2#16#6'Height'#2#23#3'Top'#3#128#0#5'Width'#3#169#0#17'B'
+#16#6'Height'#2#23#3'Top'#3#128#0#5'Width'#3#169#0#17'BorderSpacing.Top'#2#2 +'orderSpacing.Top'#2#2#8'OnChange'#7#17'ParametersChanged'#10'OnKeyPress'#7
+#8'OnChange'#7#17'ParametersChanged'#10'OnKeyPress'#7#18'ModifierEdKeyPress' +#18'ModifierEdKeyPress'#8'TabOrder'#2#5#0#0#5'TEdit'#10'BlockKeyEd'#22'Ancho'
+#8'TabOrder'#2#5#0#0#5'TEdit'#10'BlockKeyEd'#22'AnchorSideLeft.Control'#7#6 +'rSideLeft.Control'#7#6'Label1'#21'AnchorSideTop.Control'#7#6'Label5'#18'Anc'
+'Label1'#21'AnchorSideTop.Control'#7#6'Label5'#18'AnchorSideTop.Side'#7#9'as' +'horSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#13'GenerateKe'
+'rBottom'#23'AnchorSideRight.Control'#7#13'GenerateKeySb'#4'Left'#2#16#6'Hei' +'ySb'#4'Left'#2#16#6'Height'#2#23#3'Top'#3#180#0#5'Width'#3#222#1#7'Anchors'
+'ght'#2#23#3'Top'#3#180#0#5'Width'#3#222#1#7'Anchors'#11#5'akTop'#6'akLeft'#7 +#11#5'akTop'#6'akLeft'#7'akRight'#0#17'BorderSpacing.Top'#2#2#19'BorderSpaci'
+'akRight'#0#17'BorderSpacing.Top'#2#2#19'BorderSpacing.Right'#2#4#20'BorderS' +'ng.Right'#2#4#20'BorderSpacing.Bottom'#2#16#8'OnChange'#7#11'InfoChanged'#8
+'pacing.Bottom'#2#16#8'OnChange'#7#11'InfoChanged'#8'TabOrder'#2#7#0#0#0#9'T' +'TabOrder'#2#7#0#0#0#9'TGroupBox'#9'GroupBox2'#22'AnchorSideLeft.Control'#7#9
+'GroupBox'#9'GroupBox2'#22'AnchorSideLeft.Control'#7#9'GroupBox1'#21'AnchorS' +'GroupBox1'#21'AnchorSideTop.Control'#7#9'GroupBox1'#18'AnchorSideTop.Side'#7
+'ideTop.Control'#7#9'GroupBox1'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'Anc' +#9'asrBottom'#23'AnchorSideRight.Control'#7#9'GroupBox1'#20'AnchorSideRight.'
+'horSideRight.Control'#7#9'GroupBox1'#20'AnchorSideRight.Side'#7#9'asrBottom' +'Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2'C'#3'Top'#3#131#1#5'Width'#3#28
+#4'Left'#2#6#6'Height'#2'C'#3'Top'#3#131#1#5'Width'#3#28#2#7'Anchors'#11#5'a' +#2#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#9#17'BorderSpac'
+'kTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#9#17'BorderSpacing.Top'#2#6#7'Capt' +'ing.Top'#2#6#7'Caption'#6#13'Generate Code'#12'ClientHeight'#2'/'#11'Client'
+'ion'#6#13'Generate Code'#12'ClientHeight'#2'/'#11'ClientWidth'#3#24#2#16'Pa' +'Width'#3#24#2#8'TabOrder'#2#4#0#12'TSpeedButton'#13'RegCodeCopySb'#21'Ancho'
+'rentBackground'#8#8'TabOrder'#2#4#0#12'TSpeedButton'#13'RegCodeCopySb'#21'A' +'rSideTop.Control'#7#11'GenerateBtn'#18'AnchorSideTop.Side'#7#9'asrCenter'#23
+'nchorSideTop.Control'#7#11'GenerateBtn'#18'AnchorSideTop.Side'#7#9'asrCente' +'AnchorSideRight.Control'#7#9'GroupBox2'#20'AnchorSideRight.Side'#7#9'asrBot'
+'r'#23'AnchorSideRight.Control'#7#9'GroupBox2'#20'AnchorSideRight.Side'#7#9 +'tom'#4'Left'#3#241#1#6'Height'#2#23#4'Hint'#6#22'Copy code to clipboard'#3
+'asrBottom'#4'Left'#3#241#1#6'Height'#2#23#4'Hint'#6#22'Copy code to clipboa' +'Top'#2#7#5'Width'#2#23#7'Anchors'#11#5'akTop'#7'akRight'#0#19'BorderSpacing'
+'rd'#3'Top'#2#7#5'Width'#2#23#7'Anchors'#11#5'akTop'#7'akRight'#0#19'BorderS' +'.Right'#2#16#10'Glyph.Data'#10'F'#1#0#0'B'#1#0#0'BMB'#1#0#0#0#0#0#0'v'#0#0#0
+'pacing.Right'#2#16#10'Glyph.Data'#10'F'#1#0#0'B'#1#0#0'BMB'#1#0#0#0#0#0#0'v' +'('#0#0#0#17#0#0#0#17#0#0#0#1#0#4#0#0#0#0#0#204#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+#0#0#0'('#0#0#0#17#0#0#0#17#0#0#0#1#0#4#0#0#0#0#0#204#0#0#0#0#0#0#0#0#0#0#0#0 +#0#0#0#0#0#0#0#0#0#0#128#0#0#128#0#0#0#128#128#0#128#0#0#0#128#0#128#0#128
+#0#0#0#0#0#0#0#0#0#0#0#0#0#128#0#0#128#0#0#0#128#128#0#128#0#0#0#128#0#128#0 +#128#0#0#128#128#128#0#192#192#192#0#0#0#255#0#0#255#0#0#0#255#255#0#255#0#0
+#128#128#0#0#128#128#128#0#192#192#192#0#0#0#255#0#0#255#0#0#0#255#255#0#255 +#0#255#0#255#0#255#255#0#0#255#255#255#0#136#136#136#136#136#136#136#136#128
+#0#0#0#255#0#255#0#255#255#0#0#255#255#255#0#136#136#136#136#136#136#136#136 +#0#0#0#136#136#136#136#136#136#136#136#128#0#0#0#136#136#136#132'DDDD'#128#0
,#128#0#0#0#136#136#136#136#136#136#136#136#128#0#0#0#136#136#136#132'DDDD' ,#0#0#136#136#136#132#255#255#255#244#128#0#0#0#136#136#136#132#240#0#0#244
+#128#0#0#0#136#136#136#132#255#255#255#244#128#0#0#0#136#136#136#132#240#0#0 +#128#0#0#0#128#0#0#4#255#255#255#244#128#0#0#0#128#255#255#244#240#0#0#244
+#244#128#0#0#0#128#0#0#4#255#255#255#244#128#0#0#0#128#255#255#244#240#0#0 +#128#0#0#0#128#240#0#4#255#255#255#244#128#0#0#0#128#255#255#244#240#15'DD'
+#244#128#0#0#0#128#240#0#4#255#255#255#244#128#0#0#0#128#255#255#244#240#15 +#128#0#0#0#128#240#0#4#255#255'OH'#128#0#0#0#128#255#255#244#255#255'D'#136
+'DD'#128#0#0#0#128#240#0#4#255#255'OH'#128#0#0#0#128#255#255#244#255#255'D' +#128#0#0#0#128#240#15#4'DDH'#136#128#0#0#0#128#255#255#15#8#136#136#136#128#0
+#136#128#0#0#0#128#240#15#4'DDH'#136#128#0#0#0#128#255#255#15#8#136#136#136 +#0#0#128#255#255#0#136#136#136#136#128#0#0#0#128#0#0#8#136#136#136#136#128#0
+#128#0#0#0#128#255#255#0#136#136#136#136#128#0#0#0#128#0#0#8#136#136#136#136 +#0#0#136#136#136#136#136#136#136#136#128#0#0#0#136#136#136#136#136#136#136
+#128#0#0#0#136#136#136#136#136#136#136#136#128#0#0#0#136#136#136#136#136#136 +#136#128#0#0#0#7'OnClick'#7#18'RegCodeCopySbClick'#0#0#7'TButton'#11'Generat'
+#136#136#128#0#0#0#7'OnClick'#7#18'RegCodeCopySbClick'#0#0#7'TButton'#11'Gen' +'eBtn'#22'AnchorSideLeft.Control'#7#9'GroupBox2'#21'AnchorSideTop.Control'#7
+'erateBtn'#22'AnchorSideLeft.Control'#7#9'GroupBox2'#21'AnchorSideTop.Contro' +#9'GroupBox2'#4'Left'#2#8#6'Height'#2#25#4'Hint'#6#13'Generate code'#3'Top'#2
+'l'#7#9'GroupBox2'#4'Left'#2#8#6'Height'#2#25#4'Hint'#6#13'Generate code'#3 +#6#5'Width'#2'M'#18'BorderSpacing.Left'#2#8#17'BorderSpacing.Top'#2#6#20'Bor'
+'Top'#2#6#5'Width'#2'M'#18'BorderSpacing.Left'#2#8#17'BorderSpacing.Top'#2#6 +'derSpacing.Bottom'#2#16#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#9'&G'
+#20'BorderSpacing.Bottom'#2#16#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6 +'enerate'#7'Default'#9#7'OnClick'#7#16'GenerateBtnClick'#8'TabOrder'#2#0#0#0
+#9'&Generate'#7'Default'#9#7'OnClick'#7#16'GenerateBtnClick'#8'TabOrder'#2#0 +#5'TEdit'#9'RegCodeEd'#22'AnchorSideLeft.Control'#7#11'GenerateBtn'#19'Ancho'
+#0#0#5'TEdit'#9'RegCodeEd'#22'AnchorSideLeft.Control'#7#11'GenerateBtn'#19'A' +'rSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#11'GenerateBtn'
+'nchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#11'GenerateB' +#18'AnchorSideTop.Side'#7#9'asrCenter'#23'AnchorSideRight.Control'#7#13'RegC'
+'tn'#18'AnchorSideTop.Side'#7#9'asrCenter'#23'AnchorSideRight.Control'#7#13 +'odeCopySb'#4'Left'#2'a'#6'Height'#2#23#3'Top'#2#7#5'Width'#3#140#1#7'Anchor'
+'RegCodeCopySb'#4'Left'#2'a'#6'Height'#2#23#3'Top'#2#7#5'Width'#3#140#1#7'An' +'s'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'BorderSpacing.Left'#2#12#19'Border'
+'chors'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'BorderSpacing.Left'#2#12#19'Bo' +'Spacing.Right'#2#4#20'BorderSpacing.Bottom'#2#16#8'OnChange'#7#11'InfoChang'
+'rderSpacing.Right'#2#4#20'BorderSpacing.Bottom'#2#16#8'OnChange'#7#11'InfoC' +'ed'#8'TabOrder'#2#1#0#0#0#0
+'hanged'#8'TabOrder'#2#1#0#0#0#0
]); ]);