source: cprs/trunk/CPRS-Chart/Orders/fODBase.dfm

Last change on this file was 1679, checked in by healthsevak, 9 years ago

Updating the working copy to CPRS version 28

File size: 2.5 KB
Line 
1inherited frmODBase: TfrmODBase
2 Left = 277
3 Top = 179
4 Width = 528
5 Height = 275
6 HorzScrollBar.Range = 500
7 HorzScrollBar.Tracking = True
8 HorzScrollBar.Visible = True
9 VertScrollBar.Range = 225
10 VertScrollBar.Visible = True
11 BorderIcons = [biSystemMenu]
12 Caption = ''
13 FormStyle = fsStayOnTop
14 OnClose = FormClose
15 OnCloseQuery = FormCloseQuery
16 OnCreate = FormCreate
17 OnKeyPress = FormKeyPress
18 ExplicitWidth = 528
19 ExplicitHeight = 275
20 PixelsPerInch = 96
21 TextHeight = 13
22 object memOrder: TCaptionMemo [0]
23 Left = 6
24 Top = 194
25 Width = 430
26 Height = 48
27 Color = clCream
28 Ctl3D = True
29 ParentCtl3D = False
30 ReadOnly = True
31 ScrollBars = ssVertical
32 TabOrder = 0
33 end
34 object cmdAccept: TButton [1]
35 Left = 442
36 Top = 194
37 Width = 72
38 Height = 21
39 Caption = 'Accept Order'
40 TabOrder = 1
41 OnClick = cmdAcceptClick
42 end
43 object cmdQuit: TButton [2]
44 Left = 442
45 Top = 221
46 Width = 39
47 Height = 21
48 Cancel = True
49 Caption = 'Quit'
50 TabOrder = 2
51 OnClick = cmdQuitClick
52 end
53 object pnlMessage: TPanel [3]
54 Left = 24
55 Top = 176
56 Width = 381
57 Height = 44
58 BevelInner = bvRaised
59 BorderStyle = bsSingle
60 TabOrder = 3
61 Visible = False
62 OnExit = pnlMessageExit
63 OnMouseDown = pnlMessageMouseDown
64 OnMouseMove = pnlMessageMouseMove
65 object imgMessage: TImage
66 Left = 4
67 Top = 4
68 Width = 32
69 Height = 32
70 OnMouseUp = memMessageMouseUp
71 end
72 object memMessage: TRichEdit
73 Left = 40
74 Top = 4
75 Width = 332
76 Height = 32
77 Color = clInfoBk
78 Font.Charset = DEFAULT_CHARSET
79 Font.Color = clInfoText
80 Font.Height = -11
81 Font.Name = 'MS Sans Serif'
82 Font.Style = []
83 ParentFont = False
84 ReadOnly = True
85 ScrollBars = ssVertical
86 TabOrder = 0
87 WantReturns = False
88 OnMouseDown = pnlMessageMouseDown
89 OnMouseMove = pnlMessageMouseMove
90 end
91 end
92 inherited amgrMain: TVA508AccessibilityManager
93 Data = (
94 (
95 'Component = memOrder'
96 'Status = stsDefault')
97 (
98 'Component = cmdAccept'
99 'Status = stsDefault')
100 (
101 'Component = cmdQuit'
102 'Status = stsDefault')
103 (
104 'Component = pnlMessage'
105 'Status = stsDefault')
106 (
107 'Component = memMessage'
108 'Status = stsDefault')
109 (
110 'Component = frmODBase'
111 'Status = stsDefault'))
112 end
113end
Note: See TracBrowser for help on using the repository browser.