source: cprs/trunk/CPRS-Chart/fReminderTree.dfm@ 1720

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

Updating the working copy to CPRS version 28

File size: 5.1 KB
Line 
1inherited frmReminderTree: TfrmReminderTree
2 Left = 229
3 Top = 197
4 HelpContext = 11200
5 BorderIcons = [biSystemMenu]
6 Caption = 'Available Reminders'
7 ClientHeight = 241
8 ClientWidth = 472
9 FormStyle = fsStayOnTop
10 Menu = mmMain
11 OnClose = FormClose
12 OnCreate = FormCreate
13 OnDestroy = FormDestroy
14 ExplicitWidth = 480
15 ExplicitHeight = 295
16 PixelsPerInch = 96
17 TextHeight = 13
18 object pnlTop: TPanel [0]
19 Left = 0
20 Top = 0
21 Width = 472
22 Height = 241
23 Align = alClient
24 BevelOuter = bvNone
25 Caption = 'pnlTop'
26 Constraints.MinHeight = 120
27 Constraints.MinWidth = 300
28 TabOrder = 0
29 OnResize = pnlTopResize
30 ExplicitHeight = 221
31 object tvRem: TORTreeView
32 Tag = 999
33 Left = 0
34 Top = 17
35 Width = 265
36 Height = 192
37 HideSelection = False
38 Images = dmodShared.imgReminders
39 Indent = 23
40 ReadOnly = True
41 RightClickSelect = True
42 RowSelect = True
43 StateImages = dmodShared.imgReminders
44 TabOrder = 0
45 OnChange = tvRemChange
46 OnClick = tvRemClick
47 OnCollapsed = tvRemCollapsed
48 OnEnter = tvRemEnter
49 OnExit = tvRemExit
50 OnExpanded = tvRemExpanded
51 OnKeyDown = tvRemKeyDown
52 OnMouseDown = tvRemMouseDown
53 Caption = 'Available Reminders'
54 NodePiece = 0
55 OnNodeCaptioning = tvRemNodeCaptioning
56 end
57 object hcRem: THeaderControl
58 Left = 0
59 Top = 0
60 Width = 472
61 Height = 17
62 Sections = <
63 item
64 ImageIndex = -1
65 MaxWidth = 267
66 MinWidth = 267
67 Text = 'Available Reminders'
68 Width = 267
69 end
70 item
71 Alignment = taCenter
72 ImageIndex = -1
73 MaxWidth = 68
74 MinWidth = 68
75 Text = 'Due Date'
76 Width = 68
77 end
78 item
79 ImageIndex = -1
80 MaxWidth = 91
81 MinWidth = 91
82 Text = 'Last Occurrence'
83 Width = 91
84 end
85 item
86 Alignment = taCenter
87 ImageIndex = -1
88 MaxWidth = 43
89 MinWidth = 43
90 Text = 'Priority'
91 Width = 43
92 end>
93 OnSectionClick = hcRemSectionClick
94 end
95 object pnlTopRight: TPanel
96 Left = 266
97 Top = 17
98 Width = 206
99 Height = 224
100 Align = alRight
101 BevelOuter = bvNone
102 Caption = 'pnlTopRight'
103 TabOrder = 2
104 ExplicitHeight = 204
105 object bvlGap: TBevel
106 Left = 0
107 Top = 207
108 Width = 206
109 Height = 17
110 Align = alBottom
111 Shape = bsSpacer
112 Visible = False
113 ExplicitTop = 175
114 end
115 object lbRem: TORListBox
116 Left = 0
117 Top = 0
118 Width = 206
119 Height = 207
120 TabStop = False
121 Style = lbOwnerDrawFixed
122 Align = alClient
123 ItemHeight = 16
124 ParentShowHint = False
125 ShowHint = True
126 TabOrder = 0
127 OnClick = lbRemClick
128 OnDblClick = lbRemClick
129 OnDrawItem = lbRemDrawItem
130 Caption = 'Due Date, last occurance, and priority'
131 ItemTipColor = clWindow
132 ItemTipEnable = False
133 LongList = False
134 OnChange = lbRemChange
135 ExplicitHeight = 187
136 end
137 end
138 end
139 inherited amgrMain: TVA508AccessibilityManager
140 Data = (
141 (
142 'Component = pnlTop'
143 'Status = stsDefault')
144 (
145 'Component = tvRem'
146 'Status = stsDefault')
147 (
148 'Component = hcRem'
149 'Status = stsDefault')
150 (
151 'Component = pnlTopRight'
152 'Status = stsDefault')
153 (
154 'Component = lbRem'
155 'Status = stsDefault')
156 (
157 'Component = frmReminderTree'
158 'Status = stsDefault'))
159 end
160 object mmMain: TMainMenu
161 Images = dmodShared.imgReminders2
162 Left = 48
163 Top = 24
164 object memAction: TMenuItem
165 Caption = '&Action'
166 OnClick = memActionClick
167 object memEval: TMenuItem
168 Caption = '&Evaluate Reminder'
169 OnClick = memEvalClick
170 end
171 object memEvalCat: TMenuItem
172 Caption = 'Evaluate &Category Reminders'
173 OnClick = memEvalCatClick
174 end
175 object memEvalAll: TMenuItem
176 Caption = 'Evaluate Processed &Reminders'
177 OnClick = memEvalAllClick
178 end
179 object N2: TMenuItem
180 Caption = '-'
181 end
182 object memRefresh: TMenuItem
183 Caption = 'Re&fresh Reminder Dialogs'
184 OnClick = memRefreshClick
185 end
186 object mnuCoverSheet: TMenuItem
187 Caption = 'Edit Cover Sheet Reminder &List'
188 OnClick = mnuCoverSheetClick
189 end
190 object mnuExit: TMenuItem
191 Caption = 'E&xit Available Reminders'
192 ShortCut = 27
193 OnClick = mnuExitClick
194 end
195 end
196 end
197 object imgLblReminders: TVA508ImageListLabeler
198 Components = <
199 item
200 Component = tvRem
201 end>
202 Labels = <>
203 RemoteLabeler = dmodShared.imgLblReminders
204 Left = 120
205 Top = 56
206 end
207end
Note: See TracBrowser for help on using the repository browser.