TriStrem/Unit6.dfm at master · Bs0Dd/TriStrem · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
object Form6: TForm6
  Left = 287
  Top = 624
  BorderStyle = bsDialog
  Caption = 'MRK generation'
  ClientHeight = 123
  ClientWidth = 312
  Color = clBtnFace
  Constraints.MaxHeight = 200
  Constraints.MaxWidth = 400
  Constraints.MinHeight = 123
  Constraints.MinWidth = 312
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  OnShow = onShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 16
    Top = 20
    Width = 183
    Height = 13
    Caption = 'Define your custom markant (10 digits):'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clInactiveCaption
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object Button3: TButton
    Left = 183
    Top = 88
    Width = 49
    Height = 25
    Caption = 'Ok'
    ModalResult = 1
    TabOrder = 3
    OnClick = Button3Click
  end
  object Button4: TButton
    Left = 240
    Top = 88
    Width = 57
    Height = 25
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 4
    OnClick = Button4Click
  end
  object CheckBox1: TCheckBox
    Left = 24
    Top = 56
    Width = 201
    Height = 17
    Caption = 'Use randomly generated markant (IV)'
    Checked = True
    State = cbChecked
    TabOrder = 0
    OnClick = CheckBox1Click
  end
  object Edit1: TEdit
    Left = 206
    Top = 16
    Width = 41
    Height = 21
    Color = clScrollBar
    Enabled = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnChange = EditChange
    OnKeyDown = onKeyDown
    OnKeyPress = onKeyPress
  end
  object Edit2: TEdit
    Left = 254
    Top = 16
    Width = 41
    Height = 21
    Color = clScrollBar
    Enabled = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnChange = EditChange
    OnKeyDown = onKeyDown
    OnKeyPress = onKeyPress
  end
end