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

OnGuard: Fix sample projects not loading. Activate themes in sample projects. Anchored layout of sample forms.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8707 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2023-02-17 16:28:47 +00:00
parent 36eff03740
commit a9c3a3022c
152 changed files with 6033 additions and 3578 deletions
Download Patch File Download Diff File Expand all files Collapse all files

67
components/onguard/examples/exselect/exselec1.lfm
View File

@ -5,47 +5,48 @@ object Form1: TForm1
Width = 369
HorzScrollBar.Page = 368
VertScrollBar.Page = 249
ActiveControl = Memo1
AutoSize = True
Caption = 'ExSelect: '
Font.Height = -11
Font.Name = 'MS Sans Serif'
ClientHeight = 274
ClientWidth = 369
Menu = MainMenu1
OnCreate = FormCreate
object Memo1: TMemo
Left = 16
Height = 145
Top = 8
Width = 329
Color = clAqua
Lines.Strings = (
' This example uses the TOgUsageCode and the TOgSpecialCode'
' components 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 '
' 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
LCLVersion = '2.3.0.0'
object ModifyBtn: TButton
Left = 120
AnchorSideLeft.Control = Owner
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = Memo1
AnchorSideTop.Side = asrBottom
Left = 128
Height = 25
Top = 176
Top = 182
Width = 113
BorderSpacing.Bottom = 16
BorderSpacing.InnerBorder = 4
Caption = 'Modify Features'
Enabled = False
OnClick = ModifyBtnClick
TabOrder = 1
TabOrder = 0
end
object Memo1: TLabel
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Owner
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 16
Height = 150
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. 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 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 = 32
top = 168
Left = 32
Top = 168
object FeaturesMenu: TMenuItem
Caption = 'Features'
object FeaturesRequired: TMenuItem
@ -81,8 +82,8 @@ object Form1: TForm1
OnGetCode = OgUsageCode1GetCode
AutoDecrease = False
OnChangeCode = OgUsageCode1ChangeCode
left = 168
top = 48
Left = 168
Top = 48
end
object OgSpecialCode1: TOgSpecialCode
AutoCheck = False
@ -90,7 +91,7 @@ object Form1: TForm1
OnGetKey = OgSpecialCode1GetKey
OnGetCode = OgSpecialCode1GetCode
OnGetModifier = OgSpecialCode1GetModifier
left = 168
top = 16
Left = 168
Top = 16
end
end