You've already forked lazarus-ccr
d6279b614d
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8721 8e941d3f-bd1b-0410-a28a-d453659cc2b4
98 lines
2.8 KiB
Plaintext
98 lines
2.8 KiB
Plaintext
object Form1: TForm1
|
|
Left = 287
|
|
Height = 274
|
|
Top = 102
|
|
Width = 369
|
|
HorzScrollBar.Page = 368
|
|
VertScrollBar.Page = 249
|
|
AutoSize = True
|
|
Caption = 'ExSelect: '
|
|
ClientHeight = 274
|
|
ClientWidth = 369
|
|
Menu = MainMenu1
|
|
OnCreate = FormCreate
|
|
LCLVersion = '2.3.0.0'
|
|
object ModifyBtn: TButton
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = Info
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 128
|
|
Height = 25
|
|
Top = 227
|
|
Width = 113
|
|
BorderSpacing.Bottom = 16
|
|
BorderSpacing.InnerBorder = 4
|
|
Caption = 'Modify Features'
|
|
Enabled = False
|
|
OnClick = ModifyBtnClick
|
|
TabOrder = 0
|
|
end
|
|
object Info: TLabel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 16
|
|
Height = 195
|
|
Top = 16
|
|
Width = 337
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Around = 16
|
|
Caption = '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 machine 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 the companion example EXSLCODE. The release codes will be stored in a data file called EXSELECT.DAT'
|
|
Color = clAqua
|
|
ParentColor = False
|
|
WordWrap = True
|
|
end
|
|
object MainMenu1: TMainMenu
|
|
Left = 40
|
|
Top = 200
|
|
object FeaturesMenu: TMenuItem
|
|
Caption = 'Features'
|
|
object FeaturesRequired: TMenuItem
|
|
Caption = 'Required'
|
|
Checked = True
|
|
end
|
|
object FeaturesHelp: TMenuItem
|
|
Caption = 'Help'
|
|
Enabled = False
|
|
end
|
|
object FeaturesExamples: TMenuItem
|
|
Caption = 'Examples'
|
|
Enabled = False
|
|
end
|
|
object FeaturesDatabase: TMenuItem
|
|
Caption = 'Database'
|
|
Enabled = False
|
|
end
|
|
object FeaturesFax: TMenuItem
|
|
Caption = 'Fax'
|
|
Enabled = False
|
|
end
|
|
object FeaturesGoodies: TMenuItem
|
|
Caption = 'Goodies'
|
|
Enabled = False
|
|
end
|
|
end
|
|
end
|
|
object OgUsageCode1: TOgUsageCode
|
|
AutoCheck = False
|
|
OnChecked = OgUsageCode1Checked
|
|
OnGetKey = OgUsageCode1GetKey
|
|
OnGetCode = OgUsageCode1GetCode
|
|
AutoDecrease = False
|
|
OnChangeCode = OgUsageCode1ChangeCode
|
|
Left = 168
|
|
Top = 48
|
|
end
|
|
object OgSpecialCode1: TOgSpecialCode
|
|
AutoCheck = False
|
|
OnChecked = OgSpecialCode1Checked
|
|
OnGetKey = OgSpecialCode1GetKey
|
|
OnGetCode = OgSpecialCode1GetCode
|
|
OnGetModifier = OgSpecialCode1GetModifier
|
|
Left = 168
|
|
Top = 16
|
|
end
|
|
end
|