source: cprs/branches/foia-cprs/CPRS-Chart/Orders/fODMedComplex.dfm@ 1654

Last change on this file since 1654 was 459, checked in by Kevin Toppenberg, 17 years ago

Adding foia-cprs branch
File size: 4.7 KB
Line 
1inherited frmODMedComplex: TfrmODMedComplex
2 Left = 291
3 Top = 307
4 Width = 453
5 Height = 254
6 BorderIcons = []
7 Caption = 'Complex Dose'
8 Position = poScreenCenter
9 OnCreate = FormCreate
10 PixelsPerInch = 96
11 TextHeight = 13
12 object Bevel1: TBevel
13 Left = 6
14 Top = 174
15 Width = 433
16 Height = 2
17 end
18 object grdDoses: TStringGrid
19 Left = 6
20 Top = 6
21 Width = 433
22 Height = 135
23 DefaultColWidth = 78
24 DefaultRowHeight = 21
25 RowCount = 6
26 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goTabs]
27 ScrollBars = ssVertical
28 TabOrder = 4
29 OnDrawCell = grdDosesDrawCell
30 OnKeyPress = grdDosesKeyPress
31 OnMouseDown = grdDosesMouseDown
32 OnMouseUp = grdDosesMouseUp
33 RowHeights = (
34 21
35 21
36 21
37 21
38 21
39 21)
40 end
41 object cmdOK: TButton
42 Left = 290
43 Top = 184
44 Width = 72
45 Height = 21
46 Caption = 'OK'
47 TabOrder = 5
48 OnClick = cmdOKClick
49 end
50 object cmdCancel: TButton
51 Left = 368
52 Top = 184
53 Width = 72
54 Height = 21
55 Caption = 'Cancel'
56 TabOrder = 6
57 OnClick = cmdCancelClick
58 end
59 object cboRoute: TORComboBox
60 Left = 170
61 Top = 200
62 Width = 72
63 Height = 21
64 Style = orcsDropDown
65 AutoSelect = False
66 Color = clWindow
67 DropDownCount = 8
68 ItemHeight = 13
69 ItemTipColor = clWindow
70 ItemTipEnable = True
71 ListItemsOnly = False
72 LongList = False
73 MaxLength = 0
74 Pieces = '2'
75 Sorted = False
76 SynonymChars = '<>'
77 TabOrder = 1
78 Visible = False
79 OnClick = cboRouteClick
80 OnExit = cboRouteExit
81 end
82 object cboSchedule: TORComboBox
83 Left = 169
84 Top = 176
85 Width = 72
86 Height = 21
87 Style = orcsDropDown
88 AutoSelect = False
89 Color = clWindow
90 DropDownCount = 8
91 ItemHeight = 13
92 ItemTipColor = clWindow
93 ItemTipEnable = True
94 ListItemsOnly = False
95 LongList = False
96 MaxLength = 0
97 Sorted = False
98 SynonymChars = '<>'
99 TabOrder = 2
100 Visible = False
101 OnExit = cboScheduleExit
102 end
103 object pnlInstruct: TPanel
104 Left = 6
105 Top = 177
106 Width = 150
107 Height = 21
108 BevelOuter = bvNone
109 TabOrder = 0
110 Visible = False
111 OnEnter = pnlInstructEnter
112 OnExit = pnlInstructExit
113 object btnUnits: TSpeedButton
114 Left = 86
115 Top = 1
116 Width = 63
117 Height = 15
118 Caption = 'TABLET(S)'
119 Flat = True
120 Glyph.Data = {
121 AE000000424DAE0000000000000076000000280000000E000000070000000100
122 0400000000003800000000000000000000001000000010000000000000000000
123 8000008000000080800080000000800080008080000080808000C0C0C0000000
124 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
125 330033333333333333003330333333733300330003333F87330030000033FFFF
126 F30033333333333333003333333333333300}
127 Layout = blGlyphRight
128 NumGlyphs = 2
129 Spacing = 0
130 OnClick = btnUnitsClick
131 end
132 object cboInstruct: TORComboBox
133 Left = -1
134 Top = -1
135 Width = 86
136 Height = 21
137 Style = orcsDropDown
138 AutoSelect = False
139 Color = clWindow
140 DropDownCount = 8
141 ItemHeight = 13
142 ItemTipColor = clWindow
143 ItemTipEnable = True
144 ListItemsOnly = False
145 LongList = False
146 MaxLength = 80
147 Sorted = False
148 SynonymChars = '<>'
149 TabOrder = 0
150 end
151 end
152 object pnlDays: TPanel
153 Left = 6
154 Top = 201
155 Width = 67
156 Height = 21
157 BevelOuter = bvNone
158 TabOrder = 3
159 Visible = False
160 OnEnter = pnlDaysEnter
161 OnExit = pnlDaysExit
162 object Label1: TLabel
163 Left = 43
164 Top = 4
165 Width = 22
166 Height = 13
167 Caption = 'days'
168 end
169 object txtDays: TCaptionEdit
170 Left = 0
171 Top = 0
172 Width = 25
173 Height = 21
174 AutoSelect = False
175 TabOrder = 0
176 Text = '0'
177 OnChange = txtDaysChange
178 Caption = 'days'
179 end
180 object UpDown2: TUpDown
181 Left = 25
182 Top = 0
183 Width = 15
184 Height = 21
185 Associate = txtDays
186 Min = 0
187 Max = 999
188 Position = 0
189 TabOrder = 1
190 Wrap = False
191 end
192 end
193 object cmdInsert: TButton
194 Left = 6
195 Top = 149
196 Width = 79
197 Height = 17
198 Caption = 'Insert Row'
199 TabOrder = 7
200 OnClick = cmdInsertClick
201 end
202 object cmdRemove: TButton
203 Left = 92
204 Top = 149
205 Width = 91
206 Height = 17
207 Caption = 'Remove Row'
208 TabOrder = 8
209 OnClick = cmdRemoveClick
210 end
211 object popUnits: TPopupMenu
212 AutoPopup = False
213 Left = 109
214 Top = 193
215 end
216end
Note: See TracBrowser for help on using the repository browser.