source: cprs/branches/tmg-cprs/CPRS-Chart/Templates/fTemplateEditor.dfm@ 1117

Last change on this file since 1117 was 453, checked in by Kevin Toppenberg, 16 years ago

Initial upload of TMG-CPRS 1.0.26.69
File size: 61.7 KB
Line 
1object frmTemplateEditor: TfrmTemplateEditor
2 Left = 135
3 Top = 239
4 Width = 748
5 Height = 470
6 HelpContext = 10000
7 ActiveControl = tvPersonal
8 BorderIcons = [biSystemMenu, biMaximize]
9 Caption = 'Template Editor'
10 Color = clBtnFace
11 Font.Charset = DEFAULT_CHARSET
12 Font.Color = clWindowText
13 Font.Height = -11
14 Font.Name = 'MS Sans Serif'
15 Font.Style = []
16 OldCreateOrder = False
17 Position = poScreenCenter
18 Scaled = False
19 OnCloseQuery = FormCloseQuery
20 OnCreate = FormCreate
21 OnDestroy = FormDestroy
22 OnShow = FormShow
23 PixelsPerInch = 96
24 TextHeight = 13
25 object splMain: TSplitter
26 Left = 0
27 Top = 239
28 Width = 740
29 Height = 3
30 Cursor = crVSplit
31 Align = alTop
32 AutoSnap = False
33 Beveled = True
34 MinSize = 40
35 OnMoved = splMainMoved
36 end
37 object splNotes: TSplitter
38 Left = 0
39 Top = 364
40 Width = 740
41 Height = 3
42 Cursor = crVSplit
43 Align = alBottom
44 AutoSnap = False
45 Beveled = True
46 Visible = False
47 OnMoved = splBoilMoved
48 end
49 object pnlBottom: TORAutoPanel
50 Left = 0
51 Top = 409
52 Width = 740
53 Height = 27
54 Align = alBottom
55 BevelOuter = bvNone
56 TabOrder = 4
57 DesignSize = (
58 740
59 27)
60 object btnApply: TButton
61 Left = 664
62 Top = 4
63 Width = 75
64 Height = 22
65 Anchors = [akTop, akRight]
66 Caption = 'Apply'
67 ParentShowHint = False
68 ShowHint = False
69 TabOrder = 5
70 OnClick = btnApplyClick
71 end
72 object btnCancel: TButton
73 Left = 584
74 Top = 4
75 Width = 75
76 Height = 22
77 Anchors = [akTop, akRight]
78 Cancel = True
79 Caption = 'Cancel'
80 ModalResult = 2
81 ParentShowHint = False
82 ShowHint = False
83 TabOrder = 4
84 OnClick = btnCancelClick
85 end
86 object btnOK: TButton
87 Left = 504
88 Top = 4
89 Width = 75
90 Height = 22
91 Anchors = [akTop, akRight]
92 Caption = 'OK'
93 ParentShowHint = False
94 ShowHint = False
95 TabOrder = 3
96 OnClick = btnOKClick
97 end
98 object cbEditShared: TCheckBox
99 Left = 0
100 Top = 6
101 Width = 129
102 Height = 17
103 Caption = 'E&dit Shared Templates'
104 TabOrder = 0
105 OnClick = cbEditSharedClick
106 end
107 object cbNotes: TCheckBox
108 Left = 259
109 Top = 6
110 Width = 128
111 Height = 17
112 Hint =
113 'Keep notes about a template that can be seen from the templates ' +
114 'drawer'
115 Caption = 'Sh&ow Template Notes'
116 ParentShowHint = False
117 ShowHint = True
118 TabOrder = 2
119 OnClick = cbNotesClick
120 end
121 object cbEditUser: TCheckBox
122 Left = 132
123 Top = 6
124 Width = 123
125 Height = 17
126 Caption = 'E&dit User'#39's Templates'
127 TabOrder = 1
128 Visible = False
129 OnClick = cbEditSharedClick
130 end
131 end
132 object pnlBoilerplate: TPanel
133 Left = 0
134 Top = 284
135 Width = 740
136 Height = 80
137 Align = alClient
138 BevelOuter = bvNone
139 TabOrder = 2
140 OnCanResize = pnlBoilerplateCanResize
141 OnResize = pnlBoilerplateResize
142 object splBoil: TSplitter
143 Left = 0
144 Top = 36
145 Width = 740
146 Height = 3
147 Cursor = crVSplit
148 Align = alBottom
149 AutoSnap = False
150 Beveled = True
151 Visible = False
152 OnMoved = splBoilMoved
153 end
154 object reBoil: TRichEdit
155 Left = 0
156 Top = 14
157 Width = 740
158 Height = 22
159 Align = alClient
160 Font.Charset = ANSI_CHARSET
161 Font.Color = clWindowText
162 Font.Height = -11
163 Font.Name = 'Courier New'
164 Font.Style = []
165 ParentFont = False
166 PlainText = True
167 PopupMenu = popBoilerplate
168 ScrollBars = ssBoth
169 TabOrder = 1
170 WantTabs = True
171 OnChange = reBoilChange
172 OnKeyDown = reBoilKeyDown
173 OnKeyPress = reBoilKeyPress
174 OnKeyUp = reBoilKeyUp
175 OnResizeRequest = reResizeRequest
176 OnSelectionChange = reBoilSelectionChange
177 end
178 object pnlGroupBP: TPanel
179 Left = 0
180 Top = 39
181 Width = 740
182 Height = 41
183 Align = alBottom
184 BevelOuter = bvNone
185 TabOrder = 2
186 Visible = False
187 object lblGroupBP: TLabel
188 Left = 0
189 Top = 0
190 Width = 740
191 Height = 13
192 Align = alTop
193 Caption = 'Group Boilerplate'
194 end
195 object lblGroupRow: TLabel
196 Left = 264
197 Top = 0
198 Width = 23
199 Height = 13
200 Caption = 'Line:'
201 end
202 object lblGroupCol: TLabel
203 Left = 336
204 Top = 0
205 Width = 38
206 Height = 13
207 Caption = 'Column:'
208 end
209 object reGroupBP: TRichEdit
210 Left = 0
211 Top = 16
212 Width = 740
213 Height = 25
214 Align = alClient
215 Color = clCream
216 Font.Charset = ANSI_CHARSET
217 Font.Color = clWindowText
218 Font.Height = -11
219 Font.Name = 'Courier New'
220 Font.Style = []
221 ParentFont = False
222 PlainText = True
223 PopupMenu = popGroup
224 ReadOnly = True
225 ScrollBars = ssBoth
226 TabOrder = 0
227 WantReturns = False
228 OnSelectionChange = reGroupBPSelectionChange
229 end
230 object pnlGroupBPGap: TPanel
231 Left = 0
232 Top = 13
233 Width = 740
234 Height = 3
235 Align = alTop
236 BevelOuter = bvNone
237 TabOrder = 1
238 end
239 end
240 object pnlBP: TPanel
241 Left = 0
242 Top = 0
243 Width = 740
244 Height = 14
245 Align = alTop
246 BevelOuter = bvNone
247 TabOrder = 0
248 object lblBoilerplate: TLabel
249 Left = 0
250 Top = 0
251 Width = 96
252 Height = 13
253 Caption = 'Template &Boilerplate'
254 FocusControl = reBoil
255 end
256 object lblBoilRow: TLabel
257 Left = 264
258 Top = 0
259 Width = 23
260 Height = 13
261 Caption = 'Line:'
262 end
263 object lblBoilCol: TLabel
264 Left = 336
265 Top = 0
266 Width = 38
267 Height = 13
268 Caption = 'Column:'
269 Color = clBtnFace
270 ParentColor = False
271 end
272 object cbLongLines: TCheckBox
273 Left = 120
274 Top = -2
275 Width = 105
276 Height = 17
277 Caption = 'Allow Lon&g Lines'
278 TabOrder = 0
279 OnClick = cbLongLinesClick
280 end
281 end
282 end
283 object pnlTop: TPanel
284 Left = 0
285 Top = 0
286 Width = 740
287 Height = 239
288 Align = alTop
289 BevelOuter = bvNone
290 Constraints.MinHeight = 223
291 TabOrder = 0
292 object splMiddle: TSplitter
293 Left = 297
294 Top = 24
295 Height = 215
296 Align = alRight
297 AutoSnap = False
298 Beveled = True
299 end
300 object Bevel1: TBevel
301 Left = 0
302 Top = 22
303 Width = 740
304 Height = 2
305 Align = alTop
306 Shape = bsSpacer
307 end
308 object pnlRightTop: TPanel
309 Left = 300
310 Top = 24
311 Width = 440
312 Height = 215
313 Align = alRight
314 BevelOuter = bvNone
315 TabOrder = 2
316 object splProperties: TSplitter
317 Left = 216
318 Top = 0
319 Height = 215
320 Align = alRight
321 AutoSnap = False
322 Beveled = True
323 end
324 object pnlCopyBtns: TPanel
325 Left = 0
326 Top = 0
327 Width = 27
328 Height = 215
329 Align = alLeft
330 BevelOuter = bvNone
331 TabOrder = 0
332 DesignSize = (
333 27
334 215)
335 object lblCopy: TLabel
336 Left = -3
337 Top = 82
338 Width = 30
339 Height = 13
340 Alignment = taCenter
341 Anchors = [akLeft, akTop, akRight]
342 AutoSize = False
343 Caption = 'Copy'
344 Enabled = False
345 Font.Charset = DEFAULT_CHARSET
346 Font.Color = clWindowText
347 Font.Height = -11
348 Font.Name = 'MS Sans Serif'
349 Font.Style = []
350 ParentFont = False
351 Layout = tlCenter
352 end
353 object sbCopyRight: TBitBtn
354 Left = 1
355 Top = 125
356 Width = 23
357 Height = 23
358 Hint = 'Copy Shared Template into Personal Template List'
359 Enabled = False
360 ParentShowHint = False
361 ShowHint = True
362 TabOrder = 1
363 OnClick = sbCopyRightClick
364 Glyph.Data = {
365 76010000424D7601000000000000760000002800000020000000100000000100
366 0400000000000001000000000000000000001000000010000000000000000000
367 8000008000000080800080000000800080008080000080808000C0C0C0000000
368 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00111111111111
369 1111111111111111111111111111111111111111111F11111111111111011111
370 11111111117FF1111111111111001111111111111177FF111111111111000111
371 1111111111777FF11111111111000011111111FFFF7777FF1111100000000001
372 111117777777777FF1111000000000001111177777777777FF11100000000000
373 01111777777777777F1110000000000001111777777777777111100000000000
374 1111177777777777111110000000000111111777777777711111111111000011
375 1111111111777711111111111100011111111111117771111111111111001111
376 1111111111771111111111111101111111111111117111111111}
377 NumGlyphs = 2
378 end
379 object sbCopyLeft: TBitBtn
380 Tag = 1
381 Left = 1
382 Top = 100
383 Width = 23
384 Height = 23
385 Hint = 'Copy Personal Template into Shared Template List'
386 Enabled = False
387 ParentShowHint = False
388 ShowHint = True
389 TabOrder = 0
390 OnClick = sbCopyLeftClick
391 Glyph.Data = {
392 76010000424D7601000000000000760000002800000020000000100000000100
393 0400000000000001000000000000000000001000000010000000000000000000
394 8000008000000080800080000000800080008080000080808000C0C0C0000000
395 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00111111111111
396 11111111111111111111111111111111111111111111F1111111111111101111
397 111111111117F1111111111111001111111111111177F1111111111110001111
398 111111111777F1111111111100001111111111117777FFFFFF11111000000000
399 01111117777777777F1111000000000001111177777777777F11100000000000
400 01111777777777777F1110000000000001111777777777777F11110000000000
401 01111177777777777F1111100000000001111117777777777111111100001111
402 111111117777F1111111111110001111111111111777F1111111111111001111
403 111111111177F111111111111110111111111111111711111111}
404 NumGlyphs = 2
405 end
406 end
407 object pnlPersonal: TPanel
408 Left = 27
409 Top = 0
410 Width = 189
411 Height = 215
412 Align = alClient
413 BevelOuter = bvNone
414 Constraints.MinWidth = 100
415 TabOrder = 1
416 object lblPersonal: TLabel
417 Tag = 1
418 Left = 0
419 Top = 0
420 Width = 189
421 Height = 13
422 Align = alTop
423 Caption = '&Personal Templates'
424 FocusControl = tvPersonal
425 PopupMenu = popTemplates
426 end
427 object tvPersonal: TORTreeView
428 Tag = 1
429 Left = 0
430 Top = 53
431 Width = 189
432 Height = 138
433 Align = alClient
434 DragMode = dmAutomatic
435 Images = dmodShared.imgTemplates
436 Indent = 19
437 PopupMenu = popTemplates
438 RightClickSelect = True
439 TabOrder = 1
440 OnChange = tvTreeChange
441 OnDragDrop = tvTreeDragDrop
442 OnDragOver = tvTreeDragOver
443 OnEdited = tvTreeNodeEdited
444 OnEndDrag = tvTreeEndDrag
445 OnEnter = tvTreeEnter
446 OnExpanding = tvPersonalExpanding
447 OnGetImageIndex = tvTreeGetImageIndex
448 OnGetSelectedIndex = tvTreeGetSelectedIndex
449 OnKeyDown = tvTreeKeyDown
450 OnStartDrag = tvTreeStartDrag
451 Caption = 'Personal Templates'
452 NodePiece = 0
453 OnDragging = tvTreeDragging
454 end
455 object pnlPersonalBottom: TPanel
456 Left = 0
457 Top = 191
458 Width = 189
459 Height = 24
460 Align = alBottom
461 BevelOuter = bvNone
462 TabOrder = 2
463 DesignSize = (
464 189
465 24)
466 object sbPerUp: TBitBtn
467 Tag = 1
468 Left = 86
469 Top = 2
470 Width = 21
471 Height = 21
472 Hint = 'Move Personal Template Up'
473 Anchors = [akTop, akRight]
474 Enabled = False
475 ParentShowHint = False
476 ShowHint = True
477 TabOrder = 1
478 OnClick = sbMoveUpClick
479 Glyph.Data = {
480 76010000424D7601000000000000760000002800000020000000100000000100
481 0400000000000001000000000000000000001000000010000000000000000000
482 8000008000000080800080000000800080008080000080808000C0C0C0000000
483 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00111111111111
484 1111111111111111111111111111111111111111111111111111111111111111
485 111111111FFFFFF1111111110000001111111111777777F11111111100000011
486 11111111777777F1111111110000001111111111777777F11111111100000011
487 11111111777777F1111111110000001111111FFF777777FFFFF1000000000000
488 0011777777777777771110000000000001111777777777777111110000000000
489 1111117777777777111111100000000111111117777777711111111100000011
490 1111111177777711111111111000011111111111177771111111111111001111
491 1111111111771111111111111111111111111111111111111111}
492 NumGlyphs = 2
493 end
494 object sbPerDown: TBitBtn
495 Tag = 1
496 Left = 109
497 Top = 2
498 Width = 21
499 Height = 21
500 Hint = 'Move Personal Template Down'
501 Anchors = [akTop, akRight]
502 Enabled = False
503 ParentShowHint = False
504 ShowHint = True
505 TabOrder = 2
506 OnClick = sbMoveDownClick
507 Glyph.Data = {
508 76010000424D7601000000000000760000002800000020000000100000000100
509 0400000000000001000000000000000000001000000010000000000000000000
510 8000008000000080800080000000800080008080000080808000C0C0C0000000
511 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00111111111111
512 1111111111111111111111111111111111111111111111111111111111111111
513 11111111111FF1111111111111001111111111111177FF111111111110000111
514 1111111117777FF1111111110000001111111111777777FF1111111000000001
515 111111177777777FF1111100000000001111117777777777FF11100000000000
516 01111777777777777FF100000000000000117777777777777711111100000011
517 11111111777777F1111111110000001111111111777777F11111111100000011
518 11111111777777F1111111110000001111111111777777F11111111100000011
519 1111111177777711111111111111111111111111111111111111}
520 NumGlyphs = 2
521 end
522 object sbPerDelete: TBitBtn
523 Tag = 1
524 Left = 132
525 Top = 2
526 Width = 56
527 Height = 21
528 Hint = 'Delete Personal Template'
529 Anchors = [akTop, akRight]
530 Caption = 'Delete'
531 Enabled = False
532 ParentShowHint = False
533 ShowHint = True
534 TabOrder = 3
535 OnClick = sbDeleteClick
536 Glyph.Data = {
537 76010000424D7601000000000000760000002800000020000000100000000100
538 0400000000000001000000000000000000001000000010000000000000000000
539 8000008000000080800080000000800080008080000080808000C0C0C0000000
540 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00111111111111
541 1111111111111111111111111111111111111111111111111111111111111111
542 111111FF11111111FF111001111111100111177FF11111177F11100011111100
543 01111777FF1111777111110001111000111111777FF117771111111000110001
544 1111111777FF7771111111110000001111111111777777111111111110000111
545 1111111117777F1111111111100001111111111117777FF11111111100000011
546 11111111777777FF1111111000110001111111177711777FF111110001111000
547 1111117771111777FF1110001111110001111777111111777111100111111110
548 0111177111111117711111111111111111111111111111111111}
549 Layout = blGlyphRight
550 NumGlyphs = 2
551 end
552 object cbPerHide: TCheckBox
553 Left = 0
554 Top = 4
555 Width = 83
556 Height = 17
557 Hint = 'Hide Inactive Personal Templates'
558 Anchors = [akLeft, akTop, akRight]
559 Caption = 'Hide &Inactive'
560 ParentShowHint = False
561 ShowHint = True
562 TabOrder = 0
563 OnClick = cbPerHideClick
564 end
565 end
566 object pnlPersonalGap: TPanel
567 Tag = 1
568 Left = 0
569 Top = 13
570 Width = 189
571 Height = 2
572 Align = alTop
573 BevelOuter = bvNone
574 PopupMenu = popTemplates
575 TabOrder = 3
576 end
577 object pnlPerSearch: TPanel
578 Left = 0
579 Top = 15
580 Width = 189
581 Height = 38
582 Align = alTop
583 BevelOuter = bvNone
584 TabOrder = 0
585 OnResize = pnlPerSearchResize
586 DesignSize = (
587 189
588 38)
589 object btnPerFind: TORAlignButton
590 Tag = 1
591 Left = 134
592 Top = 0
593 Width = 55
594 Height = 21
595 Hint = 'Find Template'
596 Anchors = [akTop, akRight]
597 Caption = 'Find'
598 ParentShowHint = False
599 PopupMenu = popTemplates
600 ShowHint = True
601 TabOrder = 1
602 OnClick = btnFindClick
603 end
604 object edtPerSearch: TCaptionEdit
605 Tag = 1
606 Left = 0
607 Top = 0
608 Width = 134
609 Height = 21
610 Anchors = [akLeft, akTop, akRight]
611 TabOrder = 0
612 OnChange = edtSearchChange
613 OnEnter = edtPerSearchEnter
614 OnExit = edtPerSearchExit
615 Caption = 'Personal Templates'
616 end
617 object cbPerMatchCase: TCheckBox
618 Tag = 1
619 Left = 0
620 Top = 21
621 Width = 80
622 Height = 17
623 Caption = 'Match Case'
624 TabOrder = 2
625 OnClick = cbPerFindOptionClick
626 end
627 object cbPerWholeWords: TCheckBox
628 Tag = 1
629 Left = 80
630 Top = 21
631 Width = 109
632 Height = 17
633 Caption = 'Whole Words Only'
634 TabOrder = 3
635 OnClick = cbPerFindOptionClick
636 end
637 end
638 end
639 object pnlProperties: TPanel
640 Left = 219
641 Top = 0
642 Width = 221
643 Height = 215
644 Align = alRight
645 BevelOuter = bvNone
646 TabOrder = 2
647 OnResize = pnlPropertiesResize
648 object gbProperties: TGroupBox
649 Left = 0
650 Top = 0
651 Width = 221
652 Height = 215
653 Align = alClient
654 Caption = ' Template Properties '
655 Constraints.MinWidth = 100
656 TabOrder = 0
657 DesignSize = (
658 221
659 215)
660 object lblName: TLabel
661 Left = 5
662 Top = 18
663 Width = 31
664 Height = 13
665 Caption = 'Na&me:'
666 FocusControl = edtName
667 end
668 object lblLines: TLabel
669 Left = 43
670 Top = 186
671 Width = 110
672 Height = 27
673 Hint =
674 'Indicates the number of blank lines to insert, in the group boil' +
675 'erplate, between each item'#39's boilerplate.'
676 Anchors = [akLeft, akTop, akRight, akBottom]
677 AutoSize = False
678 Caption = 'Number of Blank &Lines to insert between items'
679 FocusControl = edtGap
680 ParentShowHint = False
681 ShowHint = True
682 WordWrap = True
683 end
684 object lblType: TLabel
685 Left = 5
686 Top = 44
687 Width = 74
688 Height = 13
689 Caption = 'Template T&ype:'
690 FocusControl = cbxType
691 end
692 object lblRemDlg: TLabel
693 Left = 5
694 Top = 60
695 Width = 48
696 Height = 26
697 Alignment = taCenter
698 Caption = 'Reminder &Dialog:'
699 FocusControl = cbxRemDlgs
700 WordWrap = True
701 end
702 object cbExclude: TORCheckBox
703 Left = 5
704 Top = 143
705 Width = 73
706 Height = 42
707 Hint =
708 'Removes this template'#39's boilerplate from the group'#39's boilerplate' +
709 '.'
710 Caption = 'E&xclude from Group Boilerplate'
711 ParentShowHint = False
712 ShowHint = True
713 TabOrder = 5
714 WordWrap = True
715 OnClick = cbExcludeClick
716 AutoSize = True
717 end
718 object cbActive: TCheckBox
719 Left = 5
720 Top = 86
721 Width = 61
722 Height = 17
723 Hint = 'Makes a template or folder active or inactive.'
724 Caption = 'A&ctive'
725 Checked = True
726 ParentShowHint = False
727 ShowHint = True
728 State = cbChecked
729 TabOrder = 3
730 OnClick = cbActiveClick
731 end
732 object edtGap: TCaptionEdit
733 Left = 5
734 Top = 190
735 Width = 20
736 Height = 21
737 Hint =
738 'Indicates the number of blank lines to insert, in the group boil' +
739 'erplate, between each item'#39's boilerplate.'
740 MaxLength = 1
741 ParentShowHint = False
742 ShowHint = True
743 TabOrder = 7
744 Text = '0'
745 OnChange = edtGapChange
746 OnKeyPress = edtGapKeyPress
747 Caption = 'Number of Blank Lines to insert between items'
748 end
749 object udGap: TUpDown
750 Left = 25
751 Top = 190
752 Width = 15
753 Height = 21
754 Hint =
755 'Indicates the number of blank lines to insert, in the group boil' +
756 'erplate, between each item'#39's boilerplate.'
757 Associate = edtGap
758 Max = 3
759 ParentShowHint = False
760 ShowHint = True
761 TabOrder = 8
762 end
763 object edtName: TCaptionEdit
764 Left = 38
765 Top = 15
766 Width = 177
767 Height = 21
768 Anchors = [akLeft, akTop, akRight]
769 MaxLength = 60
770 TabOrder = 0
771 OnChange = edtNameOldChange
772 OnExit = edtNameExit
773 Caption = 'Name'
774 end
775 object gbDialogProps: TGroupBox
776 Left = 89
777 Top = 87
778 Width = 126
779 Height = 95
780 Anchors = [akLeft, akTop, akRight]
781 Caption = 'Dialog Properties'
782 Font.Charset = DEFAULT_CHARSET
783 Font.Color = clWindowText
784 Font.Height = -11
785 Font.Name = 'MS Sans Serif'
786 Font.Style = []
787 ParentFont = False
788 TabOrder = 6
789 object cbDisplayOnly: TCheckBox
790 Left = 6
791 Top = 15
792 Width = 82
793 Height = 17
794 Hint =
795 'Template boilerplate is for dialog display only, and can not be ' +
796 'added to the note.'
797 Caption = 'Display Only'
798 ParentShowHint = False
799 ShowHint = True
800 TabOrder = 0
801 OnClick = cbDisplayOnlyClick
802 end
803 object cbOneItemOnly: TCheckBox
804 Left = 6
805 Top = 60
806 Width = 113
807 Height = 17
808 Hint = 'Allow only one child item to be selected at a time'
809 Caption = 'One Item Only'
810 ParentShowHint = False
811 ShowHint = True
812 TabOrder = 3
813 OnClick = cbOneItemOnlyClick
814 end
815 object cbFirstLine: TCheckBox
816 Left = 6
817 Top = 30
818 Width = 115
819 Height = 17
820 Hint =
821 'Only show the first line of text in the dialog, but include the ' +
822 'entire template in the note'
823 Caption = 'Only Show First Line'
824 ParentShowHint = False
825 ShowHint = True
826 TabOrder = 1
827 OnClick = cbFirstLineClick
828 end
829 object cbHideDlgItems: TCheckBox
830 Left = 6
831 Top = 75
832 Width = 107
833 Height = 17
834 Hint = 'Hide child items when parent template is not selected'
835 Caption = 'Hide Dialog Items'
836 ParentShowHint = False
837 ShowHint = True
838 TabOrder = 4
839 OnClick = cbHideDlgItemsClick
840 end
841 object cbIndent: TCheckBox
842 Left = 6
843 Top = 45
844 Width = 117
845 Height = 17
846 Hint =
847 'Indent child items in the dialog. Text insertion remains unchan' +
848 'ged'
849 Caption = 'Indent Dialog Items'
850 ParentShowHint = False
851 ShowHint = True
852 TabOrder = 2
853 OnClick = cbIndentClick
854 end
855 end
856 object cbHideItems: TORCheckBox
857 Left = 5
858 Top = 102
859 Width = 79
860 Height = 42
861 Hint = 'Hide child items from template drawer view'
862 Caption = 'Hide Items in Templates Dra&wer'
863 ParentShowHint = False
864 ShowHint = True
865 TabOrder = 4
866 WordWrap = True
867 OnClick = cbHideItemsClick
868 AutoSize = True
869 end
870 object cbxType: TCaptionComboBox
871 Left = 82
872 Top = 38
873 Width = 133
874 Height = 24
875 Style = csOwnerDrawFixed
876 Anchors = [akLeft, akTop, akRight]
877 ItemHeight = 18
878 ParentShowHint = False
879 ShowHint = True
880 TabOrder = 1
881 OnChange = cbxTypeChange
882 OnDrawItem = cbxTypeDrawItem
883 Caption = 'Template Type'
884 end
885 object cbxRemDlgs: TORComboBox
886 Left = 54
887 Top = 64
888 Width = 161
889 Height = 21
890 Anchors = [akLeft, akTop, akRight]
891 Style = orcsDropDown
892 AutoSelect = True
893 Caption = 'Reminder Dialog'
894 Color = clWindow
895 DropDownCount = 12
896 ItemHeight = 13
897 ItemTipColor = clWindow
898 ItemTipEnable = True
899 ListItemsOnly = True
900 LongList = False
901 LookupPiece = 0
902 MaxLength = 0
903 Pieces = '2'
904 Sorted = False
905 SynonymChars = '<>'
906 TabOrder = 2
907 OnChange = cbxRemDlgsChange
908 CharsNeedMatch = 1
909 end
910 object cbLock: TORCheckBox
911 Left = 168
912 Top = 191
913 Width = 47
914 Height = 16
915 Caption = 'Lock'
916 TabOrder = 9
917 OnClick = cbLockClick
918 end
919 end
920 end
921 end
922 object pnlShared: TPanel
923 Left = 0
924 Top = 24
925 Width = 297
926 Height = 215
927 Align = alClient
928 BevelOuter = bvNone
929 TabOrder = 1
930 object lblShared: TLabel
931 Left = 0
932 Top = 0
933 Width = 297
934 Height = 13
935 Align = alTop
936 Caption = '&Shared Templates'
937 FocusControl = tvShared
938 PopupMenu = popTemplates
939 end
940 object tvShared: TORTreeView
941 Left = 0
942 Top = 53
943 Width = 297
944 Height = 138
945 Align = alClient
946 DragMode = dmAutomatic
947 Images = dmodShared.imgTemplates
948 Indent = 19
949 PopupMenu = popTemplates
950 RightClickSelect = True
951 TabOrder = 1
952 OnChange = tvTreeChange
953 OnDragDrop = tvTreeDragDrop
954 OnDragOver = tvTreeDragOver
955 OnEdited = tvTreeNodeEdited
956 OnEndDrag = tvTreeEndDrag
957 OnEnter = tvTreeEnter
958 OnExpanding = tvSharedExpanding
959 OnGetImageIndex = tvTreeGetImageIndex
960 OnGetSelectedIndex = tvTreeGetSelectedIndex
961 OnKeyDown = tvTreeKeyDown
962 OnStartDrag = tvTreeStartDrag
963 Caption = 'Shared Templates'
964 NodePiece = 0
965 OnDragging = tvTreeDragging
966 end
967 object pnlSharedBottom: TPanel
968 Left = 0
969 Top = 191
970 Width = 297
971 Height = 24
972 Align = alBottom
973 BevelOuter = bvNone
974 TabOrder = 2
975 DesignSize = (
976 297
977 24)
978 object sbShUp: TBitBtn
979 Left = 194
980 Top = 2
981 Width = 21
982 Height = 21
983 Hint = 'Move Shared Template Up'
984 Anchors = [akTop, akRight]
985 Enabled = False
986 ParentShowHint = False
987 ShowHint = True
988 TabOrder = 1
989 OnClick = sbMoveUpClick
990 Glyph.Data = {
991 76010000424D7601000000000000760000002800000020000000100000000100
992 0400000000000001000000000000000000001000000010000000000000000000
993 8000008000000080800080000000800080008080000080808000C0C0C0000000
994 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00111111111111
995 1111111111111111111111111111111111111111111111111111111111111111
996 111111111FFFFFF1111111110000001111111111777777F11111111100000011
997 11111111777777F1111111110000001111111111777777F11111111100000011
998 11111111777777F1111111110000001111111FFF777777FFFFF1000000000000
999 0011777777777777771110000000000001111777777777777111110000000000
1000 1111117777777777111111100000000111111117777777711111111100000011
1001 1111111177777711111111111000011111111111177771111111111111001111
1002 1111111111771111111111111111111111111111111111111111}
1003 NumGlyphs = 2
1004 end
1005 object sbShDown: TBitBtn
1006 Left = 217
1007 Top = 2
1008 Width = 21
1009 Height = 21
1010 Hint = 'Move Shared Template Down'
1011 Anchors = [akTop, akRight]
1012 Enabled = False
1013 ParentShowHint = False
1014 ShowHint = True
1015 TabOrder = 2
1016 OnClick = sbMoveDownClick
1017 Glyph.Data = {
1018 76010000424D7601000000000000760000002800000020000000100000000100
1019 0400000000000001000000000000000000001000000010000000000000000000
1020 8000008000000080800080000000800080008080000080808000C0C0C0000000
1021 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00111111111111
1022 1111111111111111111111111111111111111111111111111111111111111111
1023 11111111111FF1111111111111001111111111111177FF111111111110000111
1024 1111111117777FF1111111110000001111111111777777FF1111111000000001
1025 111111177777777FF1111100000000001111117777777777FF11100000000000
1026 01111777777777777FF100000000000000117777777777777711111100000011
1027 11111111777777F1111111110000001111111111777777F11111111100000011
1028 11111111777777F1111111110000001111111111777777F11111111100000011
1029 1111111177777711111111111111111111111111111111111111}
1030 NumGlyphs = 2
1031 end
1032 object sbShDelete: TBitBtn
1033 Left = 240
1034 Top = 2
1035 Width = 56
1036 Height = 21
1037 Hint = 'Delete Shared Template'
1038 Anchors = [akTop, akRight]
1039 Caption = 'Delete'
1040 Enabled = False
1041 ParentShowHint = False
1042 ShowHint = True
1043 TabOrder = 3
1044 OnClick = sbDeleteClick
1045 Glyph.Data = {
1046 76010000424D7601000000000000760000002800000020000000100000000100
1047 0400000000000001000000000000000000001000000010000000000000000000
1048 8000008000000080800080000000800080008080000080808000C0C0C0000000
1049 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00111111111111
1050 1111111111111111111111111111111111111111111111111111111111111111
1051 111111FF11111111FF111001111111100111177FF11111177F11100011111100
1052 01111777FF1111777111110001111000111111777FF117771111111000110001
1053 1111111777FF7771111111110000001111111111777777111111111110000111
1054 1111111117777F1111111111100001111111111117777FF11111111100000011
1055 11111111777777FF1111111000110001111111177711777FF111110001111000
1056 1111117771111777FF1110001111110001111777111111777111100111111110
1057 0111177111111117711111111111111111111111111111111111}
1058 Layout = blGlyphRight
1059 NumGlyphs = 2
1060 end
1061 object cbShHide: TCheckBox
1062 Left = 0
1063 Top = 4
1064 Width = 191
1065 Height = 17
1066 Hint = 'Hide Inactive Shared Templates'
1067 Anchors = [akLeft, akTop, akRight]
1068 Caption = '&Hide Inactive'
1069 ParentShowHint = False
1070 ShowHint = True
1071 TabOrder = 0
1072 OnClick = cbShHideClick
1073 end
1074 end
1075 object pnlSharedGap: TPanel
1076 Left = 0
1077 Top = 13
1078 Width = 297
1079 Height = 2
1080 Align = alTop
1081 BevelOuter = bvNone
1082 PopupMenu = popTemplates
1083 TabOrder = 3
1084 end
1085 object pnlShSearch: TPanel
1086 Left = 0
1087 Top = 15
1088 Width = 297
1089 Height = 38
1090 Align = alTop
1091 BevelOuter = bvNone
1092 TabOrder = 0
1093 OnResize = pnlShSearchResize
1094 DesignSize = (
1095 297
1096 38)
1097 object btnShFind: TORAlignButton
1098 Left = 242
1099 Top = 0
1100 Width = 55
1101 Height = 21
1102 Hint = 'Find Template'
1103 Anchors = [akTop, akRight]
1104 Caption = 'Find'
1105 ParentShowHint = False
1106 PopupMenu = popTemplates
1107 ShowHint = True
1108 TabOrder = 1
1109 OnClick = btnFindClick
1110 end
1111 object edtShSearch: TCaptionEdit
1112 Left = 0
1113 Top = 0
1114 Width = 242
1115 Height = 21
1116 Anchors = [akLeft, akTop, akRight]
1117 TabOrder = 0
1118 OnChange = edtSearchChange
1119 OnEnter = edtShSearchEnter
1120 OnExit = edtShSearchExit
1121 Caption = 'Shared Templates'
1122 end
1123 object cbShMatchCase: TCheckBox
1124 Left = 0
1125 Top = 21
1126 Width = 80
1127 Height = 17
1128 Caption = 'Match Case'
1129 TabOrder = 2
1130 OnClick = cbShFindOptionClick
1131 end
1132 object cbShWholeWords: TCheckBox
1133 Left = 80
1134 Top = 21
1135 Width = 109
1136 Height = 17
1137 Caption = 'Whole Words Only'
1138 TabOrder = 3
1139 OnClick = cbShFindOptionClick
1140 end
1141 end
1142 end
1143 object pnlMenuBar: TPanel
1144 Left = 0
1145 Top = 0
1146 Width = 740
1147 Height = 22
1148 Align = alTop
1149 BevelOuter = bvNone
1150 TabOrder = 0
1151 object lblPerOwner: TLabel
1152 Left = 138
1153 Top = 4
1154 Width = 75
1155 Height = 13
1156 Caption = 'Personal &Owner'
1157 FocusControl = cboOwner
1158 end
1159 object cboOwner: TORComboBox
1160 Left = 219
1161 Top = 0
1162 Width = 190
1163 Height = 21
1164 Style = orcsDropDown
1165 AutoSelect = True
1166 Caption = 'Personal Owner'
1167 Color = clWindow
1168 DropDownCount = 8
1169 ItemHeight = 13
1170 ItemTipColor = clWindow
1171 ItemTipEnable = True
1172 ListItemsOnly = True
1173 LongList = True
1174 LookupPiece = 0
1175 MaxLength = 0
1176 ParentShowHint = False
1177 Pieces = '2'
1178 ShowHint = True
1179 Sorted = False
1180 SynonymChars = '<>'
1181 TabOrder = 1
1182 OnChange = cboOwnerChange
1183 OnNeedData = cboOwnerNeedData
1184 CharsNeedMatch = 1
1185 end
1186 object btnNew: TORAlignButton
1187 Left = 558
1188 Top = 0
1189 Width = 182
1190 Height = 22
1191 Caption = '&New Template'
1192 TabOrder = 2
1193 OnClick = btnNewClick
1194 Align = alRight
1195 end
1196 object pnlMenu: TPanel
1197 Left = 0
1198 Top = 0
1199 Width = 109
1200 Height = 22
1201 Align = alLeft
1202 AutoSize = True
1203 BevelInner = bvRaised
1204 BevelOuter = bvNone
1205 TabOrder = 0
1206 object mbMain: TMenuBar
1207 Left = 1
1208 Top = 1
1209 Width = 69
1210 Height = 20
1211 Align = alLeft
1212 AutoSize = True
1213 ButtonHeight = 21
1214 ButtonWidth = 43
1215 Caption = 'mbMain'
1216 Flat = True
1217 Menu = mnuMain
1218 ShowCaptions = True
1219 TabOrder = 0
1220 OnResize = mbMainResize
1221 end
1222 end
1223 end
1224 end
1225 object pnlNotes: TPanel
1226 Left = 0
1227 Top = 367
1228 Width = 740
1229 Height = 42
1230 Align = alBottom
1231 BevelOuter = bvNone
1232 TabOrder = 3
1233 Visible = False
1234 object lblNotes: TLabel
1235 Left = 0
1236 Top = 0
1237 Width = 740
1238 Height = 13
1239 Align = alTop
1240 Caption = 'Template Notes:'
1241 end
1242 object reNotes: TRichEdit
1243 Left = 0
1244 Top = 13
1245 Width = 740
1246 Height = 29
1247 Align = alClient
1248 Font.Charset = ANSI_CHARSET
1249 Font.Color = clWindowText
1250 Font.Height = -11
1251 Font.Name = 'Courier New'
1252 Font.Style = []
1253 ParentFont = False
1254 PlainText = True
1255 PopupMenu = popNotes
1256 ScrollBars = ssBoth
1257 TabOrder = 0
1258 WantTabs = True
1259 OnChange = reNotesChange
1260 OnKeyDown = reBoilKeyDown
1261 OnKeyPress = reBoilKeyPress
1262 OnKeyUp = reBoilKeyUp
1263 OnResizeRequest = reResizeRequest
1264 end
1265 end
1266 object pnlCOM: TPanel
1267 Left = 0
1268 Top = 263
1269 Width = 740
1270 Height = 21
1271 Align = alTop
1272 BevelOuter = bvNone
1273 TabOrder = 1
1274 Visible = False
1275 object lblCOMParam: TLabel
1276 Left = 283
1277 Top = 0
1278 Width = 77
1279 Height = 21
1280 Align = alLeft
1281 Caption = ' Passed Value: '
1282 Layout = tlCenter
1283 end
1284 object lblCOMObj: TLabel
1285 Left = 0
1286 Top = 0
1287 Width = 67
1288 Height = 21
1289 Align = alLeft
1290 Caption = ' COM Object: '
1291 Layout = tlCenter
1292 end
1293 object edtCOMParam: TCaptionEdit
1294 Left = 360
1295 Top = 0
1296 Width = 380
1297 Height = 21
1298 TabOrder = 0
1299 OnChange = edtCOMParamChange
1300 Align = alClient
1301 Caption = 'Passed Value'
1302 end
1303 object cbxCOMObj: TORComboBox
1304 Left = 67
1305 Top = 0
1306 Width = 216
1307 Height = 21
1308 Style = orcsDropDown
1309 Align = alLeft
1310 AutoSelect = True
1311 Caption = 'COM Object'
1312 Color = clWindow
1313 DropDownCount = 8
1314 ItemHeight = 13
1315 ItemTipColor = clWindow
1316 ItemTipEnable = True
1317 ListItemsOnly = True
1318 LongList = False
1319 LookupPiece = 0
1320 MaxLength = 0
1321 Pieces = '2'
1322 Sorted = False
1323 SynonymChars = '<>'
1324 TabOrder = 1
1325 OnChange = cbxCOMObjChange
1326 CharsNeedMatch = 1
1327 end
1328 end
1329 object pnlLink: TPanel
1330 Left = 0
1331 Top = 242
1332 Width = 740
1333 Height = 21
1334 Align = alTop
1335 BevelOuter = bvNone
1336 TabOrder = 5
1337 Visible = False
1338 object lblLink: TLabel
1339 Left = 0
1340 Top = 0
1341 Width = 138
1342 Height = 21
1343 Align = alLeft
1344 Caption = ' Associated Consult Service: '
1345 Layout = tlCenter
1346 end
1347 object cbxLink: TORComboBox
1348 Left = 138
1349 Top = 0
1350 Width = 602
1351 Height = 21
1352 Style = orcsDropDown
1353 Align = alClient
1354 AutoSelect = True
1355 Caption = ' Associated Consult Service'
1356 Color = clWindow
1357 DropDownCount = 8
1358 ItemHeight = 13
1359 ItemTipColor = clWindow
1360 ItemTipEnable = False
1361 ListItemsOnly = True
1362 LongList = True
1363 LookupPiece = 0
1364 MaxLength = 0
1365 Pieces = '2,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,1'
1366 HideSynonyms = True
1367 Sorted = False
1368 SynonymChars = '<>'
1369 TabPositions = '30,5000'
1370 TabOrder = 0
1371 TabStop = True
1372 OnChange = cbxLinkChange
1373 OnNeedData = cbxLinkNeedData
1374 OnSynonymCheck = cbxLinkSynonymCheck
1375 CharsNeedMatch = 1
1376 end
1377 end
1378 object popTemplates: TPopupMenu
1379 OnPopup = popTemplatesPopup
1380 Left = 56
1381 Top = 96
1382 object mnuNodeNew: TMenuItem
1383 Caption = '&New Template'
1384 OnClick = btnNewClick
1385 end
1386 object mnuNodeAutoGen: TMenuItem
1387 Caption = '&Generate Template'
1388 OnClick = mnuAutoGenClick
1389 end
1390 object mnuNodeCopy: TMenuItem
1391 Caption = '&Copy Template'
1392 OnClick = mnuNodeCopyClick
1393 end
1394 object mnuNodePaste: TMenuItem
1395 Caption = '&Paste Template'
1396 OnClick = mnuNodePasteClick
1397 end
1398 object mnuNodeDelete: TMenuItem
1399 Caption = '&Delete Template'
1400 OnClick = mnuNodeDeleteClick
1401 end
1402 object N15: TMenuItem
1403 Caption = '-'
1404 end
1405 object mnuNodeSort: TMenuItem
1406 Caption = 'Sort'
1407 OnClick = mnuSortClick
1408 end
1409 object N6: TMenuItem
1410 Caption = '-'
1411 end
1412 object mnuFindTemplates: TMenuItem
1413 Caption = '&Find Templates'
1414 OnClick = mnuFindTemplatesClick
1415 end
1416 object mnuCollapseTree: TMenuItem
1417 Caption = 'Collapse &Tree'
1418 OnClick = mnuCollapseTreeClick
1419 end
1420 end
1421 object popBoilerplate: TPopupMenu
1422 OnPopup = popBoilerplatePopup
1423 Left = 88
1424 Top = 332
1425 object mnuBPUndo: TMenuItem
1426 Caption = '&Undo'
1427 ShortCut = 16474
1428 OnClick = mnuBPUndoClick
1429 end
1430 object N8: TMenuItem
1431 Caption = '-'
1432 end
1433 object mnuBPCut: TMenuItem
1434 Caption = 'Cu&t'
1435 ShortCut = 16472
1436 OnClick = mnuBPCutClick
1437 end
1438 object mnuBPCopy: TMenuItem
1439 Caption = '&Copy'
1440 ShortCut = 16451
1441 OnClick = mnuBPCopyClick
1442 end
1443 object mnuBPPaste: TMenuItem
1444 Caption = '&Paste'
1445 ShortCut = 16470
1446 OnClick = mnuBPPasteClick
1447 end
1448 object mnuBPSelectAll: TMenuItem
1449 Caption = 'Select &All'
1450 ShortCut = 16449
1451 OnClick = mnuBPSelectAllClick
1452 end
1453 object N2: TMenuItem
1454 Caption = '-'
1455 end
1456 object mnuBPInsertObject: TMenuItem
1457 Caption = '&Insert Patient Data (Object)'
1458 ShortCut = 16457
1459 OnClick = mnuBPInsertObjectClick
1460 end
1461 object mnuBPInsertField: TMenuItem
1462 Caption = 'Insert Template &Field'
1463 ShortCut = 16454
1464 OnClick = mnuBPInsertFieldClick
1465 end
1466 object mnuBPErrorCheck: TMenuItem
1467 Caption = 'Check for &Errors'
1468 ShortCut = 16453
1469 OnClick = mnuBPErrorCheckClick
1470 end
1471 object mnuBPTry: TMenuItem
1472 Caption = 'Preview/Print Template'
1473 ShortCut = 16468
1474 OnClick = mnuBPTryClick
1475 end
1476 object N7: TMenuItem
1477 Caption = '-'
1478 end
1479 object mnuBPCheckGrammar: TMenuItem
1480 Caption = 'Check &Grammar'
1481 ShortCut = 16455
1482 OnClick = mnuBPCheckGrammarClick
1483 end
1484 object mnuBPSpellCheck: TMenuItem
1485 Caption = 'Check &Spelling'
1486 ShortCut = 16467
1487 OnClick = mnuBPSpellCheckClick
1488 end
1489 end
1490 object tmrAutoScroll: TTimer
1491 Enabled = False
1492 Interval = 200
1493 OnTimer = tmrAutoScrollTimer
1494 Left = 96
1495 Top = 96
1496 end
1497 object popGroup: TPopupMenu
1498 OnPopup = popGroupPopup
1499 Left = 8
1500 Top = 325
1501 object mnuGroupBPCopy: TMenuItem
1502 Caption = '&Copy'
1503 ShortCut = 16451
1504 OnClick = mnuGroupBPCopyClick
1505 end
1506 object N4: TMenuItem
1507 Caption = '-'
1508 end
1509 object mnuGroupBPSelectAll: TMenuItem
1510 Caption = 'Select &All'
1511 ShortCut = 16449
1512 OnClick = mnuGroupBPSelectAllClick
1513 end
1514 end
1515 object mnuMain: TMainMenu
1516 Left = 16
1517 Top = 104
1518 object mnuEdit: TMenuItem
1519 Caption = '&Edit'
1520 OnClick = mnuEditClick
1521 object mnuUndo: TMenuItem
1522 Caption = '&Undo'
1523 ShortCut = 16474
1524 OnClick = mnuBPUndoClick
1525 end
1526 object N9: TMenuItem
1527 Caption = '-'
1528 ShortCut = 189
1529 end
1530 object mnuCut: TMenuItem
1531 Caption = 'Cu&t'
1532 ShortCut = 16472
1533 OnClick = mnuBPCutClick
1534 end
1535 object mnuCopy: TMenuItem
1536 Caption = '&Copy'
1537 ShortCut = 16451
1538 OnClick = mnuBPCopyClick
1539 end
1540 object mnuPaste: TMenuItem
1541 Caption = '&Paste'
1542 ShortCut = 16470
1543 OnClick = mnuBPPasteClick
1544 end
1545 object mnuSelectAll: TMenuItem
1546 Caption = 'Select &All'
1547 ShortCut = 16449
1548 OnClick = mnuBPSelectAllClick
1549 end
1550 object N11: TMenuItem
1551 Caption = '-'
1552 end
1553 object mnuInsertObject: TMenuItem
1554 Caption = '&Insert Patient Data (Object)'
1555 ShortCut = 16457
1556 OnClick = mnuBPInsertObjectClick
1557 end
1558 object mnuInsertField: TMenuItem
1559 Caption = 'Insert Template &Field'
1560 ShortCut = 16454
1561 OnClick = mnuBPInsertFieldClick
1562 end
1563 object mnuErrorCheck: TMenuItem
1564 Caption = 'Check for &Errors'
1565 ShortCut = 16453
1566 OnClick = mnuBPErrorCheckClick
1567 end
1568 object mnuTry: TMenuItem
1569 Caption = 'Preview/Print Template'
1570 ShortCut = 16468
1571 OnClick = mnuBPTryClick
1572 end
1573 object N1: TMenuItem
1574 Caption = '-'
1575 end
1576 object mnuCheckGrammar: TMenuItem
1577 Caption = 'Check &Grammar'
1578 ShortCut = 16455
1579 OnClick = mnuBPCheckGrammarClick
1580 end
1581 object mnuSpellCheck: TMenuItem
1582 Caption = 'Check &Spelling'
1583 ShortCut = 16467
1584 OnClick = mnuBPSpellCheckClick
1585 end
1586 object N13: TMenuItem
1587 Caption = '-'
1588 end
1589 object mnuGroupBoilerplate: TMenuItem
1590 Caption = 'Group &Boilerplate'
1591 OnClick = mnuGroupBoilerplateClick
1592 object mnuGroupCopy: TMenuItem
1593 Caption = '&Copy'
1594 OnClick = mnuGroupBPCopyClick
1595 end
1596 object mnuGroupSelectAll: TMenuItem
1597 Caption = 'Select &All'
1598 OnClick = mnuGroupBPSelectAllClick
1599 end
1600 end
1601 end
1602 object mnuTemplate: TMenuItem
1603 Caption = '&Action'
1604 OnClick = mnuTemplateClick
1605 object mnuNewTemplate: TMenuItem
1606 Caption = '&New Template'
1607 OnClick = btnNewClick
1608 end
1609 object mnuAutoGen: TMenuItem
1610 Caption = '&Generate Template'
1611 OnClick = mnuAutoGenClick
1612 end
1613 object mnuTCopy: TMenuItem
1614 Caption = '&Copy Template'
1615 OnClick = mnuNodeCopyClick
1616 end
1617 object mnuTPaste: TMenuItem
1618 Caption = '&Paste Template'
1619 OnClick = mnuNodePasteClick
1620 end
1621 object mnuTDelete: TMenuItem
1622 Caption = '&Delete Template'
1623 OnClick = mnuNodeDeleteClick
1624 end
1625 object N12: TMenuItem
1626 Caption = '-'
1627 end
1628 object mnuSort: TMenuItem
1629 Caption = 'Sort'
1630 OnClick = mnuSortClick
1631 end
1632 object N14: TMenuItem
1633 Caption = '-'
1634 end
1635 object mnuFindShared: TMenuItem
1636 Caption = 'Find &Shared Templates'
1637 OnClick = mnuFindSharedClick
1638 end
1639 object mnuFindPersonal: TMenuItem
1640 Caption = '&Find Personal Templates'
1641 OnClick = mnuFindPersonalClick
1642 end
1643 object N3: TMenuItem
1644 Caption = '-'
1645 end
1646 object mnuShCollapse: TMenuItem
1647 Caption = 'Collapse Shared Tree'
1648 OnClick = mnuShCollapseClick
1649 end
1650 object mnuPerCollapse: TMenuItem
1651 Caption = 'Collapse Personal Tree'
1652 OnClick = mnuPerCollapseClick
1653 end
1654 end
1655 object mnuTools: TMenuItem
1656 Caption = '&Tools'
1657 OnClick = mnuToolsClick
1658 object mnuEditTemplateFields: TMenuItem
1659 Caption = 'Edit Template &Fields'
1660 OnClick = mnuEditTemplateFieldsClick
1661 end
1662 object N16: TMenuItem
1663 Caption = '-'
1664 end
1665 object mnuImportTemplate: TMenuItem
1666 Caption = '&Import Template'
1667 OnClick = mnuImportTemplateClick
1668 end
1669 object mnuExportTemplate: TMenuItem
1670 Caption = '&Export Template'
1671 OnClick = mnuExportTemplateClick
1672 end
1673 object N17: TMenuItem
1674 Caption = '-'
1675 end
1676 object mnuRefresh: TMenuItem
1677 Caption = '&Refresh Templates'
1678 OnClick = mnuRefreshClick
1679 end
1680 object mnuTemplateIconLegend: TMenuItem
1681 Caption = 'Template Icon Legend'
1682 OnClick = mnuTemplateIconLegendClick
1683 end
1684 end
1685 end
1686 object popNotes: TPopupMenu
1687 OnPopup = popNotesPopup
1688 Left = 8
1689 Top = 387
1690 object mnuNotesUndo: TMenuItem
1691 Caption = '&Undo'
1692 ShortCut = 16474
1693 OnClick = mnuNotesUndoClick
1694 end
1695 object MenuItem2: TMenuItem
1696 Caption = '-'
1697 end
1698 object mnuNotesCut: TMenuItem
1699 Caption = 'Cu&t'
1700 ShortCut = 16472
1701 OnClick = mnuNotesCutClick
1702 end
1703 object mnuNotesCopy: TMenuItem
1704 Caption = '&Copy'
1705 ShortCut = 16451
1706 OnClick = mnuNotesCopyClick
1707 end
1708 object mnuNotesPaste: TMenuItem
1709 Caption = '&Paste'
1710 ShortCut = 16470
1711 OnClick = mnuNotesPasteClick
1712 end
1713 object MenuItem6: TMenuItem
1714 Caption = '-'
1715 end
1716 object mnuNotesSelectAll: TMenuItem
1717 Caption = 'Select &All'
1718 ShortCut = 16449
1719 OnClick = mnuNotesSelectAllClick
1720 end
1721 object MenuItem8: TMenuItem
1722 Caption = '-'
1723 end
1724 object mnuNotesGrammar: TMenuItem
1725 Caption = 'Check &Grammar'
1726 ShortCut = 16455
1727 OnClick = mnuNotesGrammarClick
1728 end
1729 object mnuNotesSpelling: TMenuItem
1730 Caption = 'Check &Spelling'
1731 ShortCut = 16467
1732 OnClick = mnuNotesSpellingClick
1733 end
1734 end
1735 object dlgImport: TOpenDialog
1736 DefaultExt = 'txml'
1737 Filter = 'Template Files|*.txml|XML Files|*.xml|All Files|*.*'
1738 Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing]
1739 Left = 16
1740 Top = 136
1741 end
1742 object dlgExport: TSaveDialog
1743 DefaultExt = 'txml'
1744 Filter = 'Template Files|*.txml|XML Files|*.xml|All Files|*.*'
1745 Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
1746 Left = 56
1747 Top = 136
1748 end
1749 object DKLanguageController1: TDKLanguageController
1750 Left = 360
1751 Top = 224
1752 LangData = {
1753 110066726D54656D706C617465456469746F7201010000000100000007004361
1754 7074696F6E01B8000000070073706C4D61696E0000080073706C4E6F74657300
1755 000900706E6C426F74746F6D0000080062746E4170706C790101000000020000
1756 00070043617074696F6E00090062746E43616E63656C01010000000300000007
1757 0043617074696F6E00050062746E4F4B01010000000400000007004361707469
1758 6F6E000C00636245646974536861726564010100000005000000070043617074
1759 696F6E00070063624E6F746573010200000007000000070043617074696F6E06
1760 000000040048696E74000A006362456469745573657201010000000800000007
1761 0043617074696F6E000E00706E6C426F696C6572706C6174650000070073706C
1762 426F696C000006007265426F696C00000A00706E6C47726F7570425000000A00
1763 6C626C47726F75704250010100000009000000070043617074696F6E000B006C
1764 626C47726F7570526F7701010000000A000000070043617074696F6E000B006C
1765 626C47726F7570436F6C01010000000B000000070043617074696F6E00090072
1766 6547726F7570425000000D00706E6C47726F7570425047617000000500706E6C
1767 425000000E006C626C426F696C6572706C61746501010000000C000000070043
1768 617074696F6E000A006C626C426F696C526F7701010000000D00000007004361
1769 7074696F6E000A006C626C426F696C436F6C01010000000E0000000700436170
1770 74696F6E000B0063624C6F6E674C696E657301010000000F0000000700436170
1771 74696F6E000600706E6C546F700000090073706C4D6964646C65000006004265
1772 76656C3100000B00706E6C5269676874546F7000000D0073706C50726F706572
1773 7469657300000B00706E6C436F707942746E73000007006C626C436F70790101
1774 00000010000000070043617074696F6E000B007362436F707952696768740101
1775 00000011000000040048696E74000A007362436F70794C656674010100000012
1776 000000040048696E74000B00706E6C506572736F6E616C00000B006C626C5065
1777 72736F6E616C010100000013000000070043617074696F6E000A007476506572
1778 736F6E616C010100000014000000070043617074696F6E001100706E6C506572
1779 736F6E616C426F74746F6D000007007362506572557001010000001500000004
1780 0048696E740009007362506572446F776E010100000016000000040048696E74
1781 000B00736250657244656C657465010200000018000000070043617074696F6E
1782 17000000040048696E7400090063625065724869646501020000001A00000007
1783 0043617074696F6E19000000040048696E74000E00706E6C506572736F6E616C
1784 47617000000C00706E6C50657253656172636800000A0062746E50657246696E
1785 6401020000001C000000070043617074696F6E1B000000040048696E74000C00
1786 65647450657253656172636801010000001D000000070043617074696F6E000E
1787 0063625065724D617463684361736501010000001E000000070043617074696F
1788 6E000F00636250657257686F6C65576F72647301010000001F00000007004361
1789 7074696F6E000D00706E6C50726F7065727469657300000C00676250726F7065
1790 7274696573010100000020000000070043617074696F6E0007006C626C4E616D
1791 65010100000021000000070043617074696F6E0008006C626C4C696E65730102
1792 00000023000000070043617074696F6E22000000040048696E740007006C626C
1793 54797065010100000024000000070043617074696F6E0009006C626C52656D44
1794 6C67010100000025000000070043617074696F6E00090063624578636C756465
1795 010200000027000000070043617074696F6E26000000040048696E7400080063
1796 62416374697665010200000029000000070043617074696F6E28000000040048
1797 696E7400060065647447617001020000002B000000070043617074696F6E2A00
1798 0000040048696E74000500756447617001010000002C000000040048696E7400
1799 07006564744E616D6501010000002D000000070043617074696F6E000D006762
1800 4469616C6F6750726F707301010000002E000000070043617074696F6E000D00
1801 6362446973706C61794F6E6C79010200000030000000070043617074696F6E2F
1802 000000040048696E74000D0063624F6E654974656D4F6E6C7901020000003200
1803 0000070043617074696F6E31000000040048696E74000B00636246697273744C
1804 696E65010200000034000000070043617074696F6E33000000040048696E7400
1805 0E00636248696465446C674974656D7301020000003600000007004361707469
1806 6F6E35000000040048696E740008006362496E64656E74010200000038000000
1807 070043617074696F6E37000000040048696E74000B006362486964654974656D
1808 7301020000003A000000070043617074696F6E39000000040048696E74000700
1809 6362785479706501010000003B000000070043617074696F6E000A0063627852
1810 656D446C677301010000003C000000070043617074696F6E00060063624C6F63
1811 6B01010000003D000000070043617074696F6E000900706E6C53686172656400
1812 0009006C626C53686172656401010000003E000000070043617074696F6E0008
1813 00747653686172656401010000003F000000070043617074696F6E000F00706E
1814 6C536861726564426F74746F6D00000600736253685570010100000040000000
1815 040048696E7400080073625368446F776E010100000041000000040048696E74
1816 000A007362536844656C657465010200000043000000070043617074696F6E42
1817 000000040048696E740008006362536848696465010200000045000000070043
1818 617074696F6E44000000040048696E74000C00706E6C53686172656447617000
1819 000B00706E6C53685365617263680000090062746E536846696E640102000000
1820 47000000070043617074696F6E46000000040048696E74000B00656474536853
1821 6561726368010100000048000000070043617074696F6E000D00636253684D61
1822 74636843617365010100000049000000070043617074696F6E000E0063625368
1823 57686F6C65576F72647301010000004A000000070043617074696F6E000A0070
1824 6E6C4D656E7542617200000B006C626C5065724F776E657201010000004B0000
1825 00070043617074696F6E00080063626F4F776E657201010000004C0000000700
1826 43617074696F6E00060062746E4E657701010000004D00000007004361707469
1827 6F6E000700706E6C4D656E75000006006D624D61696E01010000004E00000007
1828 0043617074696F6E000800706E6C4E6F746573000008006C626C4E6F74657301
1829 010000004F000000070043617074696F6E00070072654E6F7465730000060070
1830 6E6C434F4D00000B006C626C434F4D506172616D010100000050000000070043
1831 617074696F6E0009006C626C434F4D4F626A0101000000510000000700436170
1832 74696F6E000B00656474434F4D506172616D0101000000520000000700436170
1833 74696F6E000900636278434F4D4F626A01010000005300000007004361707469
1834 6F6E000700706E6C4C696E6B000007006C626C4C696E6B010100000054000000
1835 070043617074696F6E0007006362784C696E6B01010000005500000007004361
1836 7074696F6E000C00706F7054656D706C6174657300000A006D6E754E6F64654E
1837 6577010100000056000000070043617074696F6E000E006D6E754E6F64654175
1838 746F47656E010100000057000000070043617074696F6E000B006D6E754E6F64
1839 65436F7079010100000058000000070043617074696F6E000C006D6E754E6F64
1840 655061737465010100000059000000070043617074696F6E000D006D6E754E6F
1841 646544656C65746501010000005A000000070043617074696F6E0003004E3135
1842 00000B006D6E754E6F6465536F727401010000005B000000070043617074696F
1843 6E0002004E36000010006D6E7546696E6454656D706C6174657301010000005C
1844 000000070043617074696F6E000F006D6E75436F6C6C61707365547265650101
1845 0000005D000000070043617074696F6E000E00706F70426F696C6572706C6174
1846 65000009006D6E754250556E646F01010000005E000000070043617074696F6E
1847 0002004E38000008006D6E75425043757401010000005F000000070043617074
1848 696F6E0009006D6E754250436F7079010100000060000000070043617074696F
1849 6E000A006D6E7542505061737465010100000061000000070043617074696F6E
1850 000E006D6E75425053656C656374416C6C010100000062000000070043617074
1851 696F6E0002004E32000011006D6E754250496E736572744F626A656374010100
1852 000063000000070043617074696F6E0010006D6E754250496E73657274466965
1853 6C64010100000064000000070043617074696F6E000F006D6E7542504572726F
1854 72436865636B010100000065000000070043617074696F6E0008006D6E754250
1855 547279010100000066000000070043617074696F6E0002004E37000011006D6E
1856 754250436865636B4772616D6D6172010100000067000000070043617074696F
1857 6E000F006D6E7542505370656C6C436865636B01010000006800000007004361
1858 7074696F6E000D00746D724175746F5363726F6C6C00000800706F7047726F75
1859 7000000E006D6E7547726F75704250436F707901010000006900000007004361
1860 7074696F6E0002004E34000013006D6E7547726F7570425053656C656374416C
1861 6C01010000006A000000070043617074696F6E0007006D6E754D61696E000007
1862 006D6E754564697401010000006B000000070043617074696F6E0007006D6E75
1863 556E646F01010000006C000000070043617074696F6E0002004E39000006006D
1864 6E7543757401010000006D000000070043617074696F6E0007006D6E75436F70
1865 7901010000006E000000070043617074696F6E0008006D6E7550617374650101
1866 0000006F000000070043617074696F6E000C006D6E7553656C656374416C6C01
1867 0100000070000000070043617074696F6E0003004E313100000F006D6E75496E
1868 736572744F626A656374010100000071000000070043617074696F6E000E006D
1869 6E75496E736572744669656C64010100000072000000070043617074696F6E00
1870 0D006D6E754572726F72436865636B010100000073000000070043617074696F
1871 6E0006006D6E75547279010100000074000000070043617074696F6E0002004E
1872 3100000F006D6E75436865636B4772616D6D6172010100000075000000070043
1873 617074696F6E000D006D6E755370656C6C436865636B01010000007600000007
1874 0043617074696F6E0003004E3133000013006D6E7547726F7570426F696C6572
1875 706C617465010100000077000000070043617074696F6E000C006D6E7547726F
1876 7570436F7079010100000078000000070043617074696F6E0011006D6E754772
1877 6F757053656C656374416C6C010100000079000000070043617074696F6E000B
1878 006D6E7554656D706C61746501010000007A000000070043617074696F6E000E
1879 006D6E754E657754656D706C61746501010000007B000000070043617074696F
1880 6E000A006D6E754175746F47656E01010000007C000000070043617074696F6E
1881 0008006D6E7554436F707901010000007D000000070043617074696F6E000900
1882 6D6E7554506173746501010000007E000000070043617074696F6E000A006D6E
1883 755444656C65746501010000007F000000070043617074696F6E0003004E3132
1884 000007006D6E75536F7274010100000080000000070043617074696F6E000300
1885 4E313400000D006D6E7546696E64536861726564010100000081000000070043
1886 617074696F6E000F006D6E7546696E64506572736F6E616C0101000000820000
1887 00070043617074696F6E0002004E3300000D006D6E755368436F6C6C61707365
1888 010100000083000000070043617074696F6E000E006D6E75506572436F6C6C61
1889 707365010100000084000000070043617074696F6E0008006D6E75546F6F6C73
1890 010100000085000000070043617074696F6E0015006D6E754564697454656D70
1891 6C6174654669656C6473010100000086000000070043617074696F6E0003004E
1892 3136000011006D6E75496D706F727454656D706C617465010100000087000000
1893 070043617074696F6E0011006D6E754578706F727454656D706C617465010100
1894 000088000000070043617074696F6E0003004E313700000A006D6E7552656672
1895 657368010100000089000000070043617074696F6E0015006D6E7554656D706C
1896 61746549636F6E4C6567656E6401010000008A000000070043617074696F6E00
1897 0800706F704E6F74657300000C006D6E754E6F746573556E646F01010000008B
1898 000000070043617074696F6E0009004D656E754974656D3200000B006D6E754E
1899 6F74657343757401010000008C000000070043617074696F6E000C006D6E754E
1900 6F746573436F707901010000008D000000070043617074696F6E000D006D6E75
1901 4E6F746573506173746501010000008E000000070043617074696F6E0009004D
1902 656E754974656D36000011006D6E754E6F74657353656C656374416C6C010100
1903 00008F000000070043617074696F6E0009004D656E754974656D3800000F006D
1904 6E754E6F7465734772616D6D6172010100000090000000070043617074696F6E
1905 0010006D6E754E6F7465735370656C6C696E6701010000009100000007004361
1906 7074696F6E000900646C67496D706F72740102000000920000000A0044656661
1907 756C7445787493000000060046696C746572000900646C674578706F72740102
1908 000000940000000A0044656661756C7445787495000000060046696C74657200}
1909 end
1910end
Note: See TracBrowser for help on using the repository browser.