source: cprs/trunk/CPRS-Chart/fNoteCPFields.dfm@ 1562

Last change on this file since 1562 was 830, checked in by Kevin Toppenberg, 14 years ago

Upgrading to version 27

File size: 3.5 KB
RevLine 
[830]1inherited frmNoteCPFields: TfrmNoteCPFields
[456]2 Left = 508
3 Top = 307
4 Caption = 'Enter Required Fields'
[830]5 ClientHeight = 151
6 ClientWidth = 249
[456]7 Position = poScreenCenter
8 OnCreate = FormCreate
[830]9 ExplicitWidth = 257
10 ExplicitHeight = 178
[456]11 PixelsPerInch = 96
12 TextHeight = 13
[830]13 object lblAuthor: TLabel [0]
[456]14 Left = 7
15 Top = 5
16 Width = 94
17 Height = 13
18 AutoSize = False
19 Caption = 'Author:'
20 end
[830]21 object lblProcSummCode: TOROffsetLabel [1]
[456]22 Left = 4
23 Top = 50
24 Width = 125
25 Height = 15
26 Caption = 'Procedure Summary Code'
27 HorzOffset = 2
28 Transparent = False
29 VertOffset = 2
30 WordWrap = False
31 end
[830]32 object lblProcDateTime: TOROffsetLabel [2]
[456]33 Left = 4
34 Top = 96
35 Width = 105
36 Height = 15
37 Caption = 'Procedure Date/Time'
38 HorzOffset = 2
39 Transparent = False
40 VertOffset = 2
41 WordWrap = False
42 end
[830]43 object cboAuthor: TORComboBox [3]
[456]44 Left = 4
45 Top = 17
46 Width = 239
47 Height = 21
48 Style = orcsDropDown
49 AutoSelect = True
50 Caption = 'Author'
51 Color = clWindow
52 DropDownCount = 8
53 ItemHeight = 13
54 ItemTipColor = clWindow
55 ItemTipEnable = True
56 ListItemsOnly = False
57 LongList = True
58 LookupPiece = 2
59 MaxLength = 0
60 ParentShowHint = False
61 Pieces = '2,3'
62 ShowHint = True
63 Sorted = False
64 SynonymChars = '<>'
65 TabOrder = 0
66 OnNeedData = cboAuthorNeedData
[830]67 CharsNeedMatch = 1
[456]68 end
[830]69 object cboProcSummCode: TORComboBox [4]
[456]70 Left = 4
71 Top = 66
72 Width = 142
73 Height = 21
74 Style = orcsDropDown
75 AutoSelect = True
76 Caption = 'Procedure Summary Code'
77 Color = clWindow
78 DropDownCount = 8
79 Items.Strings = (
80 '1^Normal'
81 '2^Abnormal'
82 '3^Borderline'
83 '4^Incomplete')
84 ItemHeight = 13
85 ItemTipColor = clWindow
86 ItemTipEnable = True
87 ListItemsOnly = False
88 LongList = False
89 LookupPiece = 0
90 MaxLength = 0
91 Pieces = '2'
92 Sorted = False
93 SynonymChars = '<>'
94 TabOrder = 1
[830]95 CharsNeedMatch = 1
[456]96 end
[830]97 object calProcDateTime: TORDateBox [5]
[456]98 Left = 4
99 Top = 112
100 Width = 142
101 Height = 21
102 TabOrder = 2
103 DateOnly = False
104 RequireTime = True
105 Caption = 'Procedure Date/Time'
106 end
[830]107 object cmdOK: TButton [6]
[456]108 Left = 166
109 Top = 78
110 Width = 72
111 Height = 21
112 Hint =
113 'Save these items, and continue to enter text interpretation of r' +
114 'esults.'
115 Caption = 'Save'
116 Default = True
117 ParentShowHint = False
118 ShowHint = True
119 TabOrder = 3
120 OnClick = cmdOKClick
121 end
[830]122 object cmdCancel: TButton [7]
[456]123 Left = 166
124 Top = 105
125 Width = 72
126 Height = 21
127 Hint =
128 'Enter text interpretation of results now, and enter these items ' +
129 'later.'
130 Cancel = True
131 Caption = 'Enter Later'
132 ParentShowHint = False
133 ShowHint = True
134 TabOrder = 4
135 OnClick = cmdCancelClick
136 end
[830]137 inherited amgrMain: TVA508AccessibilityManager
138 Data = (
139 (
140 'Component = cboAuthor'
141 'Status = stsDefault')
142 (
143 'Component = cboProcSummCode'
144 'Status = stsDefault')
145 (
146 'Component = calProcDateTime'
147 'Status = stsDefault')
148 (
149 'Component = cmdOK'
150 'Status = stsDefault')
151 (
152 'Component = cmdCancel'
153 'Status = stsDefault')
154 (
155 'Component = frmNoteCPFields'
156 'Status = stsDefault'))
157 end
[456]158end
Note: See TracBrowser for help on using the repository browser.