source: cprs/trunk/CPRS-Chart/fCombatVet.dfm@ 1682

Last change on this file since 1682 was 1682, checked in by healthsevak, 10 years ago

Added these while updating the working copy to CPRS version 28

File size: 4.7 KB
Line 
1inherited frmCombatVet: TfrmCombatVet
2 Left = 22
3 Top = 101
4 BorderStyle = bsDialog
5 Caption = 'Combat Veteran Details'
6 ClientHeight = 248
7 ClientWidth = 294
8 Position = poMainFormCenter
9 OnShow = FormShow
10 ExplicitWidth = 300
11 ExplicitHeight = 273
12 PixelsPerInch = 96
13 TextHeight = 13
14 object pnlTop: TPanel [0]
15 Left = 0
16 Top = 0
17 Width = 294
18 Height = 209
19 Align = alTop
20 Anchors = [akLeft, akTop, akRight, akBottom]
21 BevelInner = bvLowered
22 BevelWidth = 2
23 BorderWidth = 1
24 TabOrder = 0
25 DesignSize = (
26 294
27 209)
28 object lblServiceBranch: TLabel
29 Left = 36
30 Top = 18
31 Width = 76
32 Height = 13
33 Anchors = []
34 Caption = 'Service Branch:'
35 ExplicitLeft = 35
36 end
37 object lblStatus: TLabel
38 Left = 79
39 Top = 55
40 Width = 33
41 Height = 13
42 Anchors = []
43 Caption = 'Status:'
44 ExplicitLeft = 78
45 ExplicitTop = 54
46 end
47 object lblSepDate: TLabel
48 Left = 32
49 Top = 91
50 Width = 80
51 Height = 13
52 Anchors = []
53 Caption = 'Separation Date:'
54 end
55 object lblExpireDate: TLabel
56 Left = 37
57 Top = 129
58 Width = 75
59 Height = 13
60 Anchors = []
61 Caption = 'Expiration Date:'
62 ExplicitLeft = 36
63 ExplicitTop = 126
64 end
65 object edtServiceBranch: TEdit
66 Left = 120
67 Top = 18
68 Width = 166
69 Height = 21
70 Anchors = []
71 BorderStyle = bsNone
72 Color = clBtnFace
73 ReadOnly = True
74 TabOrder = 0
75 end
76 object edtStatus: TEdit
77 Left = 120
78 Top = 55
79 Width = 166
80 Height = 21
81 Anchors = []
82 BorderStyle = bsNone
83 Color = clBtnFace
84 ReadOnly = True
85 TabOrder = 1
86 end
87 object edtSeparationDate: TEdit
88 Left = 120
89 Top = 91
90 Width = 166
91 Height = 21
92 Anchors = []
93 BorderStyle = bsNone
94 Color = clBtnFace
95 ReadOnly = True
96 TabOrder = 2
97 end
98 object edtExpireDate: TEdit
99 Left = 120
100 Top = 129
101 Width = 166
102 Height = 21
103 Anchors = []
104 BorderStyle = bsNone
105 Color = clBtnFace
106 ReadOnly = True
107 TabOrder = 3
108 end
109 object edtOEF_OIF: TEdit
110 Left = 120
111 Top = 166
112 Width = 166
113 Height = 21
114 Anchors = []
115 BorderStyle = bsNone
116 Color = clBtnFace
117 ReadOnly = True
118 TabOrder = 4
119 end
120 end
121 object BitBtn1: TBitBtn [1]
122 Left = 104
123 Top = 215
124 Width = 75
125 Height = 25
126 Anchors = []
127 Cancel = True
128 Caption = 'OK'
129 Default = True
130 Font.Charset = DEFAULT_CHARSET
131 Font.Color = clWindowText
132 Font.Height = -11
133 Font.Name = 'MS Sans Serif'
134 Font.Style = []
135 ModalResult = 1
136 ParentFont = False
137 TabOrder = 1
138 Glyph.Data = {
139 DE010000424DDE01000000000000760000002800000024000000120000000100
140 0400000000006801000000000000000000001000000000000000000000000000
141 80000080000000808000800000008000800080800000C0C0C000808080000000
142 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
143 3333333333333333333333330000333333333333333333333333F33333333333
144 00003333344333333333333333388F3333333333000033334224333333333333
145 338338F3333333330000333422224333333333333833338F3333333300003342
146 222224333333333383333338F3333333000034222A22224333333338F338F333
147 8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
148 33333338F83338F338F33333000033A33333A222433333338333338F338F3333
149 0000333333333A222433333333333338F338F33300003333333333A222433333
150 333333338F338F33000033333333333A222433333333333338F338F300003333
151 33333333A222433333333333338F338F00003333333333333A22433333333333
152 3338F38F000033333333333333A223333333333333338F830000333333333333
153 333A333333333333333338330000333333333333333333333333333333333333
154 0000}
155 NumGlyphs = 2
156 end
157 inherited amgrMain: TVA508AccessibilityManager
158 Data = (
159 (
160 'Component = frmCombatVet'
161 'Status = stsDefault')
162 (
163 'Component = pnlTop'
164 'Status = stsDefault')
165 (
166 'Component = BitBtn1'
167 'Status = stsDefault')
168 (
169 'Component = edtServiceBranch'
170 'Label = lblServiceBranch'
171 'Status = stsOK')
172 (
173 'Component = edtStatus'
174 'Label = lblStatus'
175 'Status = stsOK')
176 (
177 'Component = edtSeparationDate'
178 'Label = lblSepDate'
179 'Status = stsOK')
180 (
181 'Component = edtExpireDate'
182 'Label = lblExpireDate'
183 'Status = stsOK')
184 (
185 'Component = edtOEF_OIF'
186 'Status = stsDefault'))
187 end
188end
Note: See TracBrowser for help on using the repository browser.