Context Navigation

fTemplateFieldEditor.dfm@ 1724

Last change on this file since 1724 was 1679, checked in by healthsevak, 10 years ago
Updating the working copy to CPRS version 28
File size: 27.0 KB

Line
1	inherited frmTemplateFieldEditor: TfrmTemplateFieldEditor
2	Left = 294
3	Top = 211
4	BorderIcons = [biSystemMenu, biMaximize]
5	Caption = 'Template Field Editor'
6	ClientHeight = 420
7	ClientWidth = 788
8	Position = poScreenCenter
9	OnCloseQuery = FormCloseQuery
10	OnCreate = FormCreate
11	OnDestroy = FormDestroy
12	OnResize = FormResize
13	ExplicitWidth = 796
14	ExplicitHeight = 454
15	PixelsPerInch = 96
16	TextHeight = 13
17	object splLeft: TSplitter [0]
18	Left = 429
19	Top = 25
20	Height = 366
21	Beveled = True
22	ExplicitLeft = 273
23	end
24	object pnlBottom: TPanel [1]
25	Left = 0
26	Top = 391
27	Width = 788
28	Height = 29
29	Align = alBottom
30	TabOrder = 2
31	DesignSize = (
32	788
33	29)
34	object lblReq: TStaticText
35	Left = 132
36	Top = 8
37	Width = 134
38	Height = 17
39	Caption = '* Indicates a Required Field'
40	TabOrder = 5
41	end
42	object btnOK: TButton
43	Left = 548
44	Top = 4
45	Width = 75
46	Height = 21
47	Anchors = [akTop, akRight, akBottom]
48	Caption = 'OK'
49	ModalResult = 1
50	TabOrder = 2
51	OnClick = btnOKClick
52	end
53	object btnCancel: TButton
54	Left = 628
55	Top = 4
56	Width = 75
57	Height = 21
58	Anchors = [akTop, akRight, akBottom]
59	Cancel = True
60	Caption = 'Cancel'
61	ModalResult = 2
62	TabOrder = 3
63	OnClick = btnCancelClick
64	end
65	object btnApply: TButton
66	Left = 708
67	Top = 4
68	Width = 75
69	Height = 21
70	Anchors = [akTop, akRight, akBottom]
71	Caption = 'Apply'
72	TabOrder = 4
73	OnClick = btnApplyClick
74	end
75	object btnPreview: TButton
76	Left = 435
77	Top = 4
78	Width = 75
79	Height = 21
80	Anchors = [akTop, akRight, akBottom]
81	Caption = 'Preview'
82	Enabled = False
83	TabOrder = 1
84	OnClick = btnPreviewClick
85	end
86	object cbHide: TCheckBox
87	Left = 6
88	Top = 6
89	Width = 115
90	Height = 17
91	Caption = 'Hide Inactive Fields'
92	Checked = True
93	State = cbChecked
94	TabOrder = 0
95	OnClick = cbHideClick
96	end
97	end
98	object pnlObjs: TPanel [2]
99	Left = 0
100	Top = 25
101	Width = 429
102	Height = 366
103	Align = alLeft
104	Caption = 'pnlObjs'
105	TabOrder = 0
106	OnResize = pnlObjsResize
107	object lblObjs: TLabel
108	Left = 1
109	Top = 1
110	Width = 427
111	Height = 13
112	Align = alTop
113	Caption = 'Template Fields'
114	ExplicitWidth = 74
115	end
116	object cbxObjs: TORComboBox
117	Left = 1
118	Top = 14
119	Width = 427
120	Height = 351
121	Style = orcsSimple
122	Align = alClient
123	AutoSelect = True
124	Caption = 'Template Fields'
125	Color = clWindow
126	DropDownCount = 8
127	ItemHeight = 13
128	ItemTipColor = clWindow
129	ItemTipEnable = True
130	ListItemsOnly = True
131	LongList = True
132	LookupPiece = 0
133	MaxLength = 0
134	Pieces = '2,3'
135	HideSynonyms = True
136	Sorted = False
137	SynonymChars = '<Inactive>'
138	TabPositions = '50,60,70,80,90'
139	TabOrder = 0
140	OnChange = cbxObjsChange
141	OnKeyDown = cbxObjsKeyDown
142	OnNeedData = cbxObjsNeedData
143	OnSynonymCheck = cbxObjsSynonymCheck
144	CharsNeedMatch = 1
145	end
146	end
147	object pnlRight: TPanel [3]
148	Left = 432
149	Top = 25
150	Width = 356
151	Height = 366
152	Align = alClient
153	Constraints.MinWidth = 356
154	TabOrder = 1
155	OnResize = FormResize
156	object splBottom: TSplitter
157	Left = 1
158	Top = 278
159	Width = 354
160	Height = 3
161	Cursor = crVSplit
162	Align = alBottom
163	Beveled = True
164	end
165	object pnlPreview: TPanel
166	Left = 1
167	Top = 281
168	Width = 354
169	Height = 84
170	Align = alBottom
171	TabOrder = 1
172	OnResize = FormResize
173	object lblNotes: TLabel
174	Left = 1
175	Top = 1
176	Width = 352
177	Height = 13
178	Align = alTop
179	Caption = 'Notes:'
180	ExplicitWidth = 31
181	end
182	object reNotes: TRichEdit
183	Left = 1
184	Top = 14
185	Width = 352
186	Height = 69
187	Align = alClient
188	Font.Charset = DEFAULT_CHARSET
189	Font.Color = clWindowText
190	Font.Height = -11
191	Font.Name = 'Courier New'
192	Font.Style = []
193	ParentFont = False
194	PopupMenu = popText
195	ScrollBars = ssBoth
196	TabOrder = 0
197	WantTabs = True
198	OnChange = reNotesChange
199	OnEnter = edtpopControlEnter
200	OnKeyUp = reNotesKeyUp
201	OnResizeRequest = reItemsResizeRequest
202	end
203	end
204	object pnlObjInfo: TPanel
205	Left = 1
206	Top = 1
207	Width = 354
208	Height = 277
209	Align = alClient
210	TabOrder = 0
211	OnResize = FormResize
212	DesignSize = (
213	354
214	277)
215	object lblName: TLabel
216	Left = 4
217	Top = 8
218	Width = 31
219	Height = 13
220	Caption = 'Name:'
221	end
222	object lblS2: TLabel
223	Left = 4
224	Top = 75
225	Width = 23
226	Height = 13
227	Caption = 'lblS2'
228	end
229	object lblLM: TLabel
230	Left = 3
231	Top = 194
232	Width = 42
233	Height = 13
234	Hint = 'Text to replace template field when used in List Manager'
235	Anchors = [akLeft, akBottom]
236	Caption = 'LM Text:'
237	ParentShowHint = False
238	ShowHint = True
239	end
240	object lblS1: TLabel
241	Left = 4
242	Top = 53
243	Width = 23
244	Height = 13
245	Caption = 'lblS1'
246	end
247	object lblType: TLabel
248	Left = 4
249	Top = 32
250	Width = 27
251	Height = 13
252	Caption = 'Type:'
253	end
254	object lblTextLen: TLabel
255	Left = 255
256	Top = 31
257	Width = 45
258	Height = 13
259	Anchors = [akTop, akRight]
260	Caption = 'Text Len:'
261	end
262	object lblLength: TLabel
263	Left = 157
264	Top = 31
265	Width = 46
266	Height = 13
267	Anchors = [akTop, akRight]
268	Caption = 'Field Len:'
269	end
270	object lblS3: TLabel
271	Left = 4
272	Top = 97
273	Width = 23
274	Height = 13
275	Caption = 'lblS3'
276	end
277	object lblLine: TLabel
278	Left = 4
279	Top = 152
280	Width = 23
281	Height = 13
282	Caption = 'Line:'
283	end
284	object lblCol: TLabel
285	Left = 4
286	Top = 168
287	Width = 18
288	Height = 13
289	Caption = 'Col:'
290	end
291	object edtName: TCaptionEdit
292	Left = 50
293	Top = 4
294	Width = 300
295	Height = 22
296	Anchors = [akLeft, akTop, akRight]
297	CharCase = ecUpperCase
298	Font.Charset = ANSI_CHARSET
299	Font.Color = clWindowText
300	Font.Height = -11
301	Font.Name = 'Courier New'
302	Font.Style = []
303	MaxLength = 60
304	ParentFont = False
305	PopupMenu = popText
306	TabOrder = 0
307	OnChange = edtNameChange
308	OnEnter = edtpopControlEnter
309	OnExit = edtNameExit
310	Caption = 'Name'
311	end
312	object edtLMText: TCaptionEdit
313	Left = 50
314	Top = 189
315	Width = 300
316	Height = 22
317	Hint = 'Text to replace template field when used in List Manager'
318	Anchors = [akLeft, akRight, akBottom]
319	Font.Charset = ANSI_CHARSET
320	Font.Color = clWindowText
321	Font.Height = -11
322	Font.Name = 'Courier New'
323	Font.Style = []
324	MaxLength = 70
325	ParentFont = False
326	ParentShowHint = False
327	PopupMenu = popText
328	ShowHint = True
329	TabOrder = 7
330	OnChange = edtLMTextChange
331	OnEnter = edtpopControlEnter
332	Caption = 'LM Text'
333	end
334	object cbxType: TORComboBox
335	Left = 50
336	Top = 27
337	Width = 102
338	Height = 21
339	Anchors = [akLeft, akTop, akRight]
340	Style = orcsDropDown
341	AutoSelect = True
342	Caption = 'Type'
343	Color = clWindow
344	DropDownCount = 11
345	Items.Strings = (
346	''
347	'E^Edit Box'
348	'C^Combo Box'
349	'B^Button'
350	'X^Check Boxes'
351	'R^Radio Buttons'
352	'D^Date'
353	'N^Number'
354	'H^Hyperlink'
355	'W^Word Processing'
356	'T^Text')
357	ItemHeight = 13
358	ItemTipColor = clWindow
359	ItemTipEnable = True
360	ListItemsOnly = True
361	LongList = False
362	LookupPiece = 0
363	MaxLength = 0
364	Pieces = '2'
365	Sorted = False
366	SynonymChars = '<>'
367	TabOrder = 1
368	OnChange = cbxTypeChange
369	CharsNeedMatch = 1
370	end
371	object edtTextLen: TCaptionEdit
372	Left = 309
373	Top = 27
374	Width = 26
375	Height = 21
376	Anchors = [akTop, akRight]
377	TabOrder = 4
378	Text = '0'
379	OnChange = edtTextLenChange
380	Caption = 'Text Length'
381	end
382	object udTextLen: TUpDown
383	Left = 335
384	Top = 27
385	Width = 15
386	Height = 21
387	Anchors = [akTop, akRight]
388	Associate = edtTextLen
389	Max = 240
390	TabOrder = 5
391	end
392	object pnlSwap: TPanel
393	Left = 50
394	Top = 49
395	Width = 300
396	Height = 140
397	Anchors = [akLeft, akTop, akRight, akBottom]
398	BevelOuter = bvNone
399	TabOrder = 6
400	object edtDefault: TCaptionEdit
401	Left = 0
402	Top = 0
403	Width = 300
404	Height = 22
405	Align = alTop
406	Font.Charset = ANSI_CHARSET
407	Font.Color = clWindowText
408	Font.Height = -11
409	Font.Name = 'Courier New'
410	Font.Style = []
411	MaxLength = 70
412	ParentFont = False
413	PopupMenu = popText
414	TabOrder = 2
415	OnChange = edtDefaultChange
416	OnEnter = edtpopControlEnter
417	OnExit = ControlExit
418	Caption = 'Default Value'
419	end
420	object pnlNum: TPanel
421	Left = 0
422	Top = 22
423	Width = 300
424	Height = 22
425	Align = alTop
426	BevelOuter = bvNone
427	TabOrder = 0
428	object lblMin: TLabel
429	Left = 53
430	Top = 4
431	Width = 20
432	Height = 13
433	Caption = 'Min:'
434	end
435	object lblInc: TLabel
436	Left = 207
437	Top = 4
438	Width = 50
439	Height = 13
440	Caption = 'Increment:'
441	end
442	object lblMaxVal: TLabel
443	Left = 129
444	Top = 4
445	Width = 23
446	Height = 13
447	Caption = 'Max:'
448	end
449	object udDefNum: TUpDown
450	Left = 34
451	Top = 0
452	Width = 15
453	Height = 21
454	Associate = edtDefNum
455	Min = -9999
456	Max = 9999
457	TabOrder = 1
458	Thousands = False
459	end
460	object edtDefNum: TCaptionEdit
461	Left = 0
462	Top = 0
463	Width = 34
464	Height = 21
465	TabOrder = 0
466	Text = '0'
467	OnChange = edtDefNumChange
468	Caption = 'Default Number'
469	end
470	object udMinVal: TUpDown
471	Left = 110
472	Top = 0
473	Width = 15
474	Height = 21
475	Associate = edtMinVal
476	Min = -9999
477	Max = 9999
478	TabOrder = 3
479	Thousands = False
480	end
481	object edtMinVal: TCaptionEdit
482	Left = 76
483	Top = 0
484	Width = 34
485	Height = 21
486	TabOrder = 2
487	Text = '0'
488	OnChange = edtMinValChange
489	Caption = 'Minimum'
490	end
491	object udInc: TUpDown
492	Left = 285
493	Top = 0
494	Width = 15
495	Height = 21
496	Associate = edtInc
497	Min = 1
498	Max = 999
499	Position = 1
500	TabOrder = 7
501	end
502	object edtInc: TCaptionEdit
503	Left = 259
504	Top = 0
505	Width = 26
506	Height = 21
507	TabOrder = 6
508	Text = '1'
509	OnChange = edtIncChange
510	Caption = 'Increment'
511	end
512	object edtMaxVal: TCaptionEdit
513	Left = 155
514	Top = 0
515	Width = 34
516	Height = 21
517	TabOrder = 4
518	Text = '0'
519	OnChange = edtMaxValChange
520	Caption = 'Maimum'
521	end
522	object udMaxVal: TUpDown
523	Left = 189
524	Top = 0
525	Width = 15
526	Height = 21
527	Associate = edtMaxVal
528	Min = -9999
529	Max = 9999
530	TabOrder = 5
531	Thousands = False
532	end
533	end
534	object edtURL: TCaptionEdit
535	Left = 0
536	Top = 66
537	Width = 300
538	Height = 22
539	Align = alTop
540	Font.Charset = ANSI_CHARSET
541	Font.Color = clWindowText
542	Font.Height = -11
543	Font.Name = 'Courier New'
544	Font.Style = []
545	MaxLength = 240
546	ParentFont = False
547	PopupMenu = popText
548	TabOrder = 3
549	OnChange = edtURLChange
550	OnEnter = edtpopControlEnter
551	Caption = 'URL'
552	end
553	object reItems: TRichEdit
554	Left = 0
555	Top = 110
556	Width = 300
557	Height = 30
558	Align = alClient
559	Font.Charset = ANSI_CHARSET
560	Font.Color = clWindowText
561	Font.Height = -11
562	Font.Name = 'Courier New'
563	Font.Style = []
564	ParentFont = False
565	PopupMenu = popText
566	ScrollBars = ssBoth
567	TabOrder = 5
568	WantTabs = True
569	OnChange = reItemsChange
570	OnEnter = edtpopControlEnter
571	OnExit = ControlExit
572	OnKeyUp = reNotesKeyUp
573	OnResizeRequest = reItemsResizeRequest
574	OnSelectionChange = reItemsSelectionChange
575	end
576	object cbxDefault: TORComboBox
577	Left = 0
578	Top = 44
579	Width = 300
580	Height = 22
581	Style = orcsDropDown
582	Align = alTop
583	AutoSelect = True
584	Caption = 'Default Selection'
585	Color = clWindow
586	DropDownCount = 8
587	Font.Charset = ANSI_CHARSET
588	Font.Color = clWindowText
589	Font.Height = -11
590	Font.Name = 'Courier New'
591	Font.Style = []
592	ItemHeight = 14
593	ItemTipColor = clWindow
594	ItemTipEnable = True
595	ListItemsOnly = True
596	LongList = False
597	LookupPiece = 0
598	MaxLength = 0
599	ParentFont = False
600	Sorted = False
601	SynonymChars = '<>'
602	TabOrder = 1
603	TabStop = True
604	OnChange = cbxDefaultChange
605	CharsNeedMatch = 1
606	end
607	object pnlDate: TPanel
608	Left = 0
609	Top = 88
610	Width = 300
611	Height = 22
612	Align = alTop
613	BevelOuter = bvNone
614	TabOrder = 4
615	DesignSize = (
616	300
617	22)
618	object lblDateType: TLabel
619	Left = 111
620	Top = 4
621	Width = 53
622	Height = 13
623	Anchors = [akTop, akRight]
624	Caption = 'Date Type:'
625	end
626	object edtDateDef: TCaptionEdit
627	Left = 0
628	Top = 0
629	Width = 106
630	Height = 21
631	Anchors = [akLeft, akTop, akRight]
632	MaxLength = 70
633	PopupMenu = popText
634	TabOrder = 0
635	OnChange = edtDefaultChange
636	OnEnter = edtpopControlEnter
637	Caption = 'Default Date'
638	end
639	object cbxDateType: TORComboBox
640	Left = 167
641	Top = 0
642	Width = 133
643	Height = 21
644	Anchors = [akTop, akRight]
645	Style = orcsDropDown
646	AutoSelect = True
647	Caption = 'Date Type'
648	Color = clWindow
649	DropDownCount = 8
650	Items.Strings = (
651	'D^Date'
652	'T^Date & Time'
653	'R^Date & Required Time'
654	'C^Combo Style'
655	'Y^Combo Year Only'
656	'M^Combo Year & Month')
657	ItemHeight = 13
658	ItemTipColor = clWindow
659	ItemTipEnable = True
660	ListItemsOnly = True
661	LongList = False
662	LookupPiece = 0
663	MaxLength = 0
664	Pieces = '2'
665	Sorted = False
666	SynonymChars = '<>'
667	TabOrder = 1
668	OnChange = cbxDateTypeChange
669	CharsNeedMatch = 1
670	end
671	end
672	end
673	object edtLen: TCaptionEdit
674	Left = 214
675	Top = 27
676	Width = 19
677	Height = 21
678	Anchors = [akTop, akRight]
679	TabOrder = 2
680	Text = '1'
681	OnChange = edtLenChange
682	Caption = 'Field Length'
683	end
684	object udLen: TUpDown
685	Left = 233
686	Top = 27
687	Width = 15
688	Height = 21
689	Anchors = [akTop, akRight]
690	Associate = edtLen
691	Min = 1
692	Max = 70
693	Position = 1
694	TabOrder = 3
695	end
696	object gbIndent: TGroupBox
697	Left = 232
698	Top = 213
699	Width = 118
700	Height = 59
701	Anchors = [akLeft, akBottom]
702	Caption = ' Indent '
703	TabOrder = 9
704	object lblIndent: TLabel
705	Left = 10
706	Top = 14
707	Width = 58
708	Height = 13
709	Caption = 'Indent Field:'
710	end
711	object lblPad: TLabel
712	Left = 10
713	Top = 37
714	Width = 57
715	Height = 13
716	Caption = 'Indent Text:'
717	end
718	object edtIndent: TCaptionEdit
719	Left = 72
720	Top = 10
721	Width = 21
722	Height = 21
723	TabOrder = 0
724	Text = '0'
725	OnChange = edtIndentChange
726	Caption = 'Indent Field'
727	end
728	object udIndent: TUpDown
729	Left = 93
730	Top = 10
731	Width = 15
732	Height = 21
733	Associate = edtIndent
734	Max = 30
735	TabOrder = 1
736	Thousands = False
737	end
738	object udPad: TUpDown
739	Left = 93
740	Top = 33
741	Width = 15
742	Height = 21
743	Associate = edtPad
744	Max = 30
745	TabOrder = 2
746	Thousands = False
747	end
748	object edtPad: TCaptionEdit
749	Left = 72
750	Top = 33
751	Width = 21
752	Height = 21
753	TabOrder = 3
754	Text = '0'
755	OnChange = edtPadChange
756	Caption = 'Indent Text'
757	end
758	end
759	object gbMisc: TGroupBox
760	Left = 10
761	Top = 213
762	Width = 207
763	Height = 59
764	Anchors = [akLeft, akBottom]
765	Caption = ' Miscellaneous '
766	TabOrder = 8
767	object cbActive: TCheckBox
768	Left = 6
769	Top = 14
770	Width = 67
771	Height = 17
772	BiDiMode = bdLeftToRight
773	Caption = 'Inactive'
774	ParentBiDiMode = False
775	TabOrder = 0
776	OnClick = cbActiveClick
777	end
778	object cbRequired: TCheckBox
779	Left = 6
780	Top = 37
781	Width = 67
782	Height = 17
783	Caption = 'Required'
784	TabOrder = 1
785	OnClick = cbRequiredClick
786	end
787	object cbSepLines: TCheckBox
788	Left = 83
789	Top = 14
790	Width = 99
791	Height = 17
792	Caption = 'Separate Lines'
793	TabOrder = 2
794	OnClick = cbSepLinesClick
795	end
796	object cbExclude: TCheckBox
797	Left = 83
798	Top = 37
799	Width = 118
800	Height = 17
801	Caption = 'Exclude From Note'
802	TabOrder = 3
803	OnClick = cbExcludeClick
804	end
805	end
806	end
807	end
808	object pnlTop: TPanel [4]
809	Left = 0
810	Top = 0
811	Width = 788
812	Height = 25
813	Align = alTop
814	BevelOuter = bvNone
815	TabOrder = 3
816	DesignSize = (
817	788
818	25)
819	object MenuBar1: TMenuBar
820	Left = 0
821	Top = 0
822	Width = 41
823	Height = 25
824	Align = alLeft
825	AutoSize = True
826	ButtonHeight = 21
827	ButtonWidth = 43
828	Caption = 'MenuBar1'
829	Menu = mnuMain
830	ShowCaptions = True
831	TabOrder = 0
832	end
833	object btnNew: TButton
834	Left = 710
835	Top = 2
836	Width = 75
837	Height = 21
838	Anchors = [akTop, akRight, akBottom]
839	Caption = 'New'
840	TabOrder = 3
841	OnClick = mnuNewClick
842	end
843	object btnCopy: TButton
844	Left = 631
845	Top = 2
846	Width = 75
847	Height = 21
848	Anchors = [akTop, akRight, akBottom]
849	Caption = 'Copy'
850	Enabled = False
851	TabOrder = 2
852	OnClick = mnuCopyClick
853	end
854	object btnDelete: TButton
855	Left = 552
856	Top = 2
857	Width = 75
858	Height = 21
859	Anchors = [akTop, akRight, akBottom]
860	Caption = 'Delete'
861	Enabled = False
862	TabOrder = 1
863	OnClick = mnuDeleteClick
864	end
865	end
866	inherited amgrMain: TVA508AccessibilityManager
867	Data = (
868	(
869	'Component = pnlBottom'
870	'Status = stsDefault')
871	(
872	'Component = lblReq'
873	'Status = stsDefault')
874	(
875	'Component = btnOK'
876	'Status = stsDefault')
877	(
878	'Component = btnCancel'
879	'Status = stsDefault')
880	(
881	'Component = btnApply'
882	'Status = stsDefault')
883	(
884	'Component = btnPreview'
885	'Status = stsDefault')
886	(
887	'Component = cbHide'
888	'Status = stsDefault')
889	(
890	'Component = pnlObjs'
891	'Status = stsDefault')
892	(
893	'Component = cbxObjs'
894	'Status = stsDefault')
895	(
896	'Component = pnlRight'
897	'Status = stsDefault')
898	(
899	'Component = pnlPreview'
900	'Status = stsDefault')
901	(
902	'Component = reNotes'
903	'Status = stsDefault')
904	(
905	'Component = pnlObjInfo'
906	'Status = stsDefault')
907	(
908	'Component = edtName'
909	'Status = stsDefault')
910	(
911	'Component = edtLMText'
912	'Status = stsDefault')
913	(
914	'Component = cbxType'
915	'Status = stsDefault')
916	(
917	'Component = edtTextLen'
918	'Status = stsDefault')
919	(
920	'Component = udTextLen'
921	'Status = stsDefault')
922	(
923	'Component = pnlSwap'
924	'Status = stsDefault')
925	(
926	'Component = edtDefault'
927	'Status = stsDefault')
928	(
929	'Component = pnlNum'
930	'Status = stsDefault')
931	(
932	'Component = udDefNum'
933	'Status = stsDefault')
934	(
935	'Component = edtDefNum'
936	'Status = stsDefault')
937	(
938	'Component = udMinVal'
939	'Status = stsDefault')
940	(
941	'Component = edtMinVal'
942	'Status = stsDefault')
943	(
944	'Component = udInc'
945	'Status = stsDefault')
946	(
947	'Component = edtInc'
948	'Status = stsDefault')
949	(
950	'Component = edtMaxVal'
951	'Status = stsDefault')
952	(
953	'Component = udMaxVal'
954	'Status = stsDefault')
955	(
956	'Component = edtURL'
957	'Status = stsDefault')
958	(
959	'Component = reItems'
960	'Status = stsDefault')
961	(
962	'Component = cbxDefault'
963	'Status = stsDefault')
964	(
965	'Component = pnlDate'
966	'Status = stsDefault')
967	(
968	'Component = edtDateDef'
969	'Status = stsDefault')
970	(
971	'Component = cbxDateType'
972	'Status = stsDefault')
973	(
974	'Component = edtLen'
975	'Status = stsDefault')
976	(
977	'Component = udLen'
978	'Status = stsDefault')
979	(
980	'Component = gbIndent'
981	'Status = stsDefault')
982	(
983	'Component = edtIndent'
984	'Status = stsDefault')
985	(
986	'Component = udIndent'
987	'Status = stsDefault')
988	(
989	'Component = udPad'
990	'Status = stsDefault')
991	(
992	'Component = edtPad'
993	'Status = stsDefault')
994	(
995	'Component = gbMisc'
996	'Status = stsDefault')
997	(
998	'Component = cbActive'
999	'Status = stsDefault')
1000	(
1001	'Component = cbRequired'
1002	'Status = stsDefault')
1003	(
1004	'Component = cbSepLines'
1005	'Status = stsDefault')
1006	(
1007	'Component = cbExclude'
1008	'Status = stsDefault')
1009	(
1010	'Component = pnlTop'
1011	'Status = stsDefault')
1012	(
1013	'Component = MenuBar1'
1014	'Status = stsDefault')
1015	(
1016	'Component = btnNew'
1017	'Status = stsDefault')
1018	(
1019	'Component = btnCopy'
1020	'Status = stsDefault')
1021	(
1022	'Component = btnDelete'
1023	'Status = stsDefault')
1024	(
1025	'Component = frmTemplateFieldEditor'
1026	'Status = stsDefault'))
1027	end
1028	object mnuMain: TMainMenu
1029	Left = 8
1030	Top = 64
1031	object mnuAction: TMenuItem
1032	Caption = '&Action'
1033	OnClick = mnuActionClick
1034	object mnuNew: TMenuItem
1035	Caption = '&New'
1036	OnClick = mnuNewClick
1037	end
1038	object mnuCopy: TMenuItem
1039	Caption = '&Copy'
1040	OnClick = mnuCopyClick
1041	end
1042	object mnuDelete: TMenuItem
1043	Caption = '&Delete'
1044	OnClick = mnuDeleteClick
1045	end
1046	object mnuPreview: TMenuItem
1047	Caption = '&Preview'
1048	OnClick = btnPreviewClick
1049	end
1050	end
1051	end
1052	object popText: TPopupMenu
1053	OnPopup = popTextPopup
1054	Left = 339
1055	Top = 204
1056	object mnuBPUndo: TMenuItem
1057	Caption = '&Undo'
1058	ShortCut = 16474
1059	OnClick = mnuBPUndoClick
1060	end
1061	object N8: TMenuItem
1062	Caption = '-'
1063	end
1064	object mnuBPCut: TMenuItem
1065	Caption = 'Cu&t'
1066	ShortCut = 16472
1067	OnClick = mnuBPCutClick
1068	end
1069	object mnuBPCopy: TMenuItem
1070	Caption = '&Copy'
1071	ShortCut = 16451
1072	OnClick = mnuBPCopyClick
1073	end
1074	object mnuBPPaste: TMenuItem
1075	Caption = '&Paste'
1076	ShortCut = 16470
1077	OnClick = mnuBPPasteClick
1078	end
1079	object mnuBPSelectAll: TMenuItem
1080	Caption = 'Select &All'
1081	ShortCut = 16449
1082	OnClick = mnuBPSelectAllClick
1083	end
1084	object N2: TMenuItem
1085	Caption = '-'
1086	end
1087	object mnuBPCheckGrammar: TMenuItem
1088	Caption = 'Check &Grammar'
1089	ShortCut = 16455
1090	OnClick = mnuBPCheckGrammarClick
1091	end
1092	object mnuBPSpellCheck: TMenuItem
1093	Caption = 'Check &Spelling'
1094	ShortCut = 16467
1095	OnClick = mnuBPSpellCheckClick
1096	end
1097	object N14: TMenuItem
1098	Caption = '-'
1099	end
1100	object mnuInsertTemplateField: TMenuItem
1101	Caption = 'Insert Template &Field'
1102	ShortCut = 16454
1103	OnClick = mnuInsertTemplateFieldClick
1104	end
1105	end
1106	end

Note: See TracBrowser for help on using the repository browser.

Download in other formats:

Original Format