caseGenerator/caseGenerator_GeneralData.fmx at master · fabrizio-turchi/caseGenerator · 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
104
105
106
107
108
109
110
111
112
object formNewCase: TformNewCase
  Left = 0
  Top = 0
  Caption = 'General data of the Case'
  ClientHeight = 371
  ClientWidth = 538
  FormFactor.Width = 320
  FormFactor.Height = 480
  FormFactor.Devices = [Desktop]
  OnShow = FormShow
  DesignerMasterStyle = 0
  object Label1: TLabel
    Position.X = 16.000000000000000000
    Position.Y = 16.000000000000000000
    Size.Width = 161.000000000000000000
    Size.Height = 17.000000000000000000
    Size.PlatformDefault = False
    TextSettings.Font.Size = 18.000000000000000000
    Text = 'National Procedure Number'
    TabOrder = 0
  end
  object edName: TEdit
    Touch.InteractiveGestures = [LongTap, DoubleTap]
    TabOrder = 1
    TextSettings.Font.Size = 16.000000000000000000
    Position.X = 16.000000000000000000
    Position.Y = 32.000000000000000000
    Size.Width = 513.000000000000000000
    Size.Height = 22.000000000000000000
    Size.PlatformDefault = False
  end
  object Label3: TLabel
    Position.X = 16.000000000000000000
    Position.Y = 72.000000000000000000
    TextSettings.Font.Size = 18.000000000000000000
    Text = 'Focus'
    TabOrder = 2
  end
  object edFocus: TEdit
    Touch.InteractiveGestures = [LongTap, DoubleTap]
    TabOrder = 3
    TextSettings.Font.Size = 16.000000000000000000
    Position.X = 16.000000000000000000
    Position.Y = 96.000000000000000000
    Size.Width = 513.000000000000000000
    Size.Height = 22.000000000000000000
    Size.PlatformDefault = False
  end
  object Label4: TLabel
    Position.X = 16.000000000000000000
    Position.Y = 128.000000000000000000
    Size.Width = 241.000000000000000000
    Size.Height = 25.000000000000000000
    Size.PlatformDefault = False
    TextSettings.Font.Size = 18.000000000000000000
    Text = 'Short description'
    TabOrder = 7
  end
  object memoShortDescription: TMemo
    Touch.InteractiveGestures = [Pan, LongTap, DoubleTap]
    DataDetectorTypes = []
    TextSettings.Font.Size = 16.000000000000000000
    Position.X = 16.000000000000000000
    Position.Y = 152.000000000000000000
    Size.Width = 513.000000000000000000
    Size.Height = 49.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 5
    Viewport.Width = 513.000000000000000000
    Viewport.Height = 49.000000000000000000
  end
  object btnConfirm: TButton
    Position.X = 144.000000000000000000
    Position.Y = 344.000000000000000000
    Size.Width = 105.000000000000000000
    Size.Height = 22.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 8
    Text = 'Save and close'
    OnClick = btnConfirmClick
  end
  object Label5: TLabel
    Position.X = 16.000000000000000000
    Position.Y = 209.000000000000000000
    Size.Width = 241.000000000000000000
    Size.Height = 25.000000000000000000
    Size.PlatformDefault = False
    TextSettings.Font.Size = 18.000000000000000000
    Text = 'Description'
    TabOrder = 4
  end
  object memoDescription: TMemo
    Touch.InteractiveGestures = [Pan, LongTap, DoubleTap]
    DataDetectorTypes = []
    TextSettings.Font.Size = 16.000000000000000000
    Position.X = 16.000000000000000000
    Position.Y = 232.000000000000000000
    Size.Width = 513.000000000000000000
    Size.Height = 97.000000000000000000
    Size.PlatformDefault = False
    TabOrder = 6
    Viewport.Width = 513.000000000000000000
    Viewport.Height = 97.000000000000000000
  end
  object btnCancel: TButton
    Position.X = 264.000000000000000000
    Position.Y = 344.000000000000000000
    TabOrder = 9
    Text = 'Cancel'
    OnClick = btnCancelClick
  end
end