You've already forked lazarus-ccr
- initial support for InvalidCount , which allow to run program even if trial rules are broken (but only exactly set count) - IDE serial number used instead of volume serial git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@921 8e941d3f-bd1b-0410-a28a-d453659cc2b4
78 lines
2.0 KiB
Plaintext
78 lines
2.0 KiB
Plaintext
object Form1: TForm1
|
|
Left = 406
|
|
Height = 266
|
|
Top = 322
|
|
Width = 357
|
|
ActiveControl = Memo1
|
|
Caption = 'ExSelAPI: '
|
|
ClientHeight = 246
|
|
ClientWidth = 357
|
|
Font.Height = -11
|
|
Font.Name = 'MS Sans Serif'
|
|
Menu = MainMenu1
|
|
OnCreate = FormCreate
|
|
LCLVersion = '0.9.27'
|
|
object Memo1: TMemo
|
|
Left = 16
|
|
Height = 145
|
|
Top = 8
|
|
Width = 313
|
|
Color = clAqua
|
|
Lines.Strings = (
|
|
' This example uses the OgUsageCode and the OgSpecialCode'
|
|
' (via OnGuard API functions) to implement a limited use'
|
|
' "demo" application which allows only the required features.'
|
|
' The program can be run 3 times and then a special code'
|
|
' must be obtained to register the program and to enable'
|
|
' various features. A machine modifier is used to prevent'
|
|
' the application from being copied and run on another'
|
|
' machine. To obtain the release code you need to run the'
|
|
' companion example EXSLCODE. The release codes will be '
|
|
' stored in a data file called EXSELECT.DAT'
|
|
)
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
end
|
|
object ModifyBtn: TButton
|
|
Left = 120
|
|
Height = 25
|
|
Top = 176
|
|
Width = 113
|
|
BorderSpacing.InnerBorder = 4
|
|
Caption = 'Modify Features'
|
|
OnClick = ModifyBtnClick
|
|
TabOrder = 1
|
|
end
|
|
object MainMenu1: TMainMenu
|
|
left = 32
|
|
top = 168
|
|
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
|
|
end
|