source: cprs/branches/HealthSevak-CPRS/CPRS-Chart/fReminderTree.dfm@ 1679

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

Upgrading to version 27

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