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
42 lines
878 B
Plaintext
42 lines
878 B
Plaintext
object FirstInstFrm: TFirstInstFrm
|
|
ActiveControl = Memo1
|
|
Caption = 'Single Instance Example'
|
|
ClientHeight = 140
|
|
ClientWidth = 320
|
|
Font.Color = clText
|
|
Font.Height = 11
|
|
Font.Name = 'MS Sans Serif'
|
|
Font.Pitch = fpVariable
|
|
PixelsPerInch = 96
|
|
HorzScrollBar.Page = 319
|
|
HorzScrollBar.Range = 307
|
|
VertScrollBar.Page = 139
|
|
VertScrollBar.Range = 129
|
|
Left = 327
|
|
Height = 140
|
|
Top = 218
|
|
Width = 320
|
|
object Memo1: TMemo
|
|
Lines.Strings = (
|
|
'Attempts to execute this application a second time result in '
|
|
'the first instance to be activated and the second instance '
|
|
'terminated.'
|
|
)
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
Left = 8
|
|
Height = 89
|
|
Top = 8
|
|
Width = 297
|
|
end
|
|
object BitBtn2: TBitBtn
|
|
Kind = bkClose
|
|
NumGlyphs = 0
|
|
TabOrder = 1
|
|
Left = 232
|
|
Height = 25
|
|
Top = 104
|
|
Width = 75
|
|
end
|
|
end
|