Files
lazarus-ccr/components/onguard/source/qonguard3.lfm

288 lines
9.9 KiB
Plaintext
Raw Normal View History

object KeyMaintFrm: TKeyMaintFrm
Left = 240
Height = 414
Top = 219
Width = 489
HorzScrollBar.Page = 488
VertScrollBar.Page = 413
ActiveControl = OKBtn
BorderIcons = [biSystemMenu, biMinimize]
Caption = 'Key Maintenance'
OnCreate = FormCreate
Position = poScreenCenter
object OKBtn: TBitBtn
Left = 304
Height = 25
Top = 376
Width = 75
Caption = 'OK'
Default = True
ModalResult = 1
NumGlyphs = 0
TabOrder = 0
end
object CancelBtn: TBitBtn
Left = 386
Height = 25
Top = 376
Width = 75
Caption = 'Cancel'
ModalResult = 2
NumGlyphs = 0
TabOrder = 1
end
object FileNameGb: TGroupBox
Left = 7
Height = 63
Top = 2
Width = 454
Caption = '&File name'
TabOrder = 2
object OpenFileSb: TSpeedButton
Left = 328
Height = 23
Hint = 'Find key maintenance file'
Top = 6
Width = 23
Color = clBtnFace
Glyph.Data = {
26050000424D26050000000000003604000028000000100000000F0000000100
0800000000000000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0C8
A400000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00070707070707
0707070707070707070700000000000000000000000707070707000003030303
0303030303000707070700FB000303030303030303030007070700FFFB000303
0303030303030300070700FBFFFB00030303030303030303000700FFFBFFFB00
0000000000000000000000FBFFFBFFFBFFFBFFFB00070707070700FFFBFFFBFF
FBFFFBFF00070707070700FBFFFB000000000000000707070707070000000707
0707070707070000000707070707070707070707070707000007070707070707
0707000707070007000707070707070707070700000007070707070707070707
07070707070707070707
}
NumGlyphs = 0
OnClick = OpenFileClick
end
object OpenBtn: TBitBtn
Left = 357
Height = 25
Top = 6
Width = 90
Caption = '&Open'
NumGlyphs = 0
OnClick = OpenBtnClick
TabOrder = 0
end
object FileNameEd: TEdit
Left = 8
Height = 25
Top = 6
Width = 315
TabOrder = 1
Text = 'onguard.ini'
end
end
object ProductsGb: TGroupBox
Left = 7
Height = 181
Top = 64
Width = 454
Caption = 'A&pplications'
TabOrder = 3
object AddBtn: TButton
Left = 357
Height = 25
Hint = 'Add a new product and key'
Top = 8
Width = 90
BorderSpacing.InnerBorder = 4
Caption = '&Add...'
OnClick = AddBtnClick
TabOrder = 0
end
object EditBtn: TButton
Left = 357
Height = 25
Hint = 'Edit the selected product'
Top = 48
Width = 90
BorderSpacing.InnerBorder = 4
Caption = '&Edit...'
OnClick = EditBtnClick
TabOrder = 1
end
object DeleteBtn: TButton
Left = 357
Height = 25
Hint = 'Remove the selected product'
Top = 88
Width = 90
BorderSpacing.InnerBorder = 4
Caption = '&Delete'
OnClick = DeleteBtnClick
TabOrder = 2
end
object ProductsLb: TListBox
Left = 8
Height = 148
Top = 8
Width = 343
OnClick = ProductsLbClick
TabOrder = 3
TopIndex = -1
end
end
object GroupBox1: TGroupBox
Left = 6
Height = 121
Top = 248
Width = 457
Caption = '&Key'
TabOrder = 4
object CopyBlockKeySb: TSpeedButton
Left = 398
Height = 23
Hint = 'Copy key to clipboard'
Top = 24
Width = 23
Color = clBtnFace
Glyph.Data = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC00000000000000000000000000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888800000008888888888888888800000008888888444444444800000008888
8884FFFFFFF48000000088888884F00000F48000000080000004FFFFFFF48000
000080FFFFF4F00000F48000000080F00004FFFFFFF48000000080FFFFF4F00F
44448000000080F00004FFFF4F488000000080FFFFF4FFFF44888000000080F0
0F04444448888000000080FFFF0F088888888000000080FFFF00888888888000
0000800000088888888880000000888888888888888880000000888888888888
888880000000
}
NumGlyphs = 0
OnClick = CopyBlockKeySbClick
end
object KeyPasteSb: TSpeedButton
Left = 425
Height = 23
Hint = 'Paste from clipboard'
Top = 26
Width = 23
Color = clBtnFace
Glyph.Data = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC00000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
2222200000002222222222222222200000002222224444444444200000002000
004FFFFFFFF4200000000838384F000000F4200000000383834FFFFFFFF42000
00000838384F000F4444200000000383834FFFFF4F42200000000838384FFFFF
4422200000000383834444444022200000000838383838383022200000000380
0000000380222000000008307777770830222000000003830B00B08380222000
0000200000BB0000022220000000222220000222222220000000222222222222
222220000000
}
NumGlyphs = 0
OnClick = KeyPasteSbClick
end
object CopyByteKeySb: TSpeedButton
Left = 398
Height = 23
Hint = 'Copy key to clipboard'
Top = 57
Width = 23
Color = clBtnFace
Glyph.Data = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC00000000000000000000000000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888800000008888888888888888800000008888888444444444800000008888
8884FFFFFFF48000000088888884F00000F48000000080000004FFFFFFF48000
000080FFFFF4F00000F48000000080F00004FFFFFFF48000000080FFFFF4F00F
44448000000080F00004FFFF4F488000000080FFFFF4FFFF44888000000080F0
0F04444448888000000080FFFF0F088888888000000080FFFF00888888888000
0000800000088888888880000000888888888888888880000000888888888888
888880000000
}
NumGlyphs = 0
OnClick = CopyByteKeySbClick
end
object SpeedButton1: TSpeedButton
Left = 425
Height = 23
Hint = 'Paste from clipboard'
Top = 57
Width = 23
Color = clBtnFace
Glyph.Data = {
42010000424D4201000000000000760000002800000011000000110000000100
040000000000CC00000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00222222222222
2222200000002222222222222222200000002222224444444444200000002000
004FFFFFFFF4200000000838384F000000F4200000000383834FFFFFFFF42000
00000838384F000F4444200000000383834FFFFF4F42200000000838384FFFFF
4422200000000383834444444022200000000838383838383022200000000380
0000000380222000000008307777770830222000000003830B00B08380222000
0000200000BB0000022220000000222220000222222220000000222222222222
222220000000
}
NumGlyphs = 0
OnClick = SpeedButton1Click
end
object BlockKeyEd: TEdit
Left = 8
Height = 25
Top = 24
Width = 388
TabOrder = 0
end
object BytesKeyEd: TEdit
Left = 8
Height = 25
Top = 57
Width = 388
TabOrder = 1
end
end
object OpenDialog1: TOpenDialog
Title = 'Select Key Maintenance File'
DefaultExt = '.ini'
Filter = 'INI Files (*.ini)|*.ini|All Files (*.*)|*.*'
FilterIndex = 0
Options = [ofPathMustExist]
left = 368
top = 144
end
end