source: cprs/branches/HealthSevak-CPRS/CPRS-Chart/fARTFreeTextMsg.dfm@ 1797

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

Upgrading to version 27

File size: 2.1 KB
Line 
1inherited frmARTFreeTextMsg: TfrmARTFreeTextMsg
2 Left = 426
3 Top = 266
4 Caption = 'Enter Optional Comments'
5 ClientHeight = 332
6 ClientWidth = 386
7 Constraints.MinHeight = 180
8 Constraints.MinWidth = 394
9 Position = poMainFormCenter
10 ExplicitWidth = 394
11 ExplicitHeight = 366
12 PixelsPerInch = 96
13 TextHeight = 13
14 object pnlText: TORAutoPanel [0]
15 Left = 0
16 Top = 0
17 Width = 386
18 Height = 133
19 Align = alTop
20 BevelOuter = bvNone
21 Constraints.MinHeight = 133
22 TabOrder = 0
23 object lblText: TLabel
24 Left = 17
25 Top = 7
26 Width = 3
27 Height = 13
28 end
29 object lblComments: TOROffsetLabel
30 Left = 2
31 Top = 118
32 Width = 100
33 Height = 15
34 Caption = 'Comments (optional):'
35 HorzOffset = 2
36 Transparent = False
37 VertOffset = 2
38 WordWrap = False
39 end
40 end
41 object pnlButton: TORAutoPanel [1]
42 Left = 0
43 Top = 294
44 Width = 386
45 Height = 38
46 Align = alBottom
47 BevelOuter = bvNone
48 Constraints.MinHeight = 38
49 TabOrder = 2
50 object cmdContinue: TButton
51 Left = 155
52 Top = 9
53 Width = 75
54 Height = 21
55 Caption = '&Continue'
56 Constraints.MinHeight = 21
57 TabOrder = 0
58 OnClick = cmdContinueClick
59 end
60 end
61 object memFreeText: TCaptionRichEdit [2]
62 Left = 0
63 Top = 133
64 Width = 386
65 Height = 161
66 Align = alClient
67 Font.Charset = DEFAULT_CHARSET
68 Font.Color = clWindowText
69 Font.Height = -11
70 Font.Name = 'Courier New'
71 Font.Style = []
72 ParentFont = False
73 PlainText = True
74 TabOrder = 1
75 Caption = 'Additional comments:'
76 end
77 inherited amgrMain: TVA508AccessibilityManager
78 Data = (
79 (
80 'Component = pnlText'
81 'Status = stsDefault')
82 (
83 'Component = pnlButton'
84 'Status = stsDefault')
85 (
86 'Component = cmdContinue'
87 'Status = stsDefault')
88 (
89 'Component = memFreeText'
90 'Status = stsDefault')
91 (
92 'Component = frmARTFreeTextMsg'
93 'Status = stsDefault'))
94 end
95end
Note: See TracBrowser for help on using the repository browser.