Last change
on this file since 1103 was 453, checked in by Kevin Toppenberg, 16 years ago |
Initial upload of TMG-CPRS 1.0.26.69
|
File size:
2.7 KB
|
Line | |
---|
1 | object frmPCEProvider: TfrmPCEProvider
|
---|
2 | Left = 192
|
---|
3 | Top = 104
|
---|
4 | BorderIcons = [biSystemMenu]
|
---|
5 | BorderStyle = bsDialog
|
---|
6 | Caption = 'Primary Encounter Provider'
|
---|
7 | ClientHeight = 254
|
---|
8 | ClientWidth = 317
|
---|
9 | Color = clBtnFace
|
---|
10 | Font.Charset = DEFAULT_CHARSET
|
---|
11 | Font.Color = clWindowText
|
---|
12 | Font.Height = -11
|
---|
13 | Font.Name = 'MS Sans Serif'
|
---|
14 | Font.Style = []
|
---|
15 | OldCreateOrder = False
|
---|
16 | Position = poScreenCenter
|
---|
17 | OnCreate = FormCreate
|
---|
18 | PixelsPerInch = 96
|
---|
19 | TextHeight = 13
|
---|
20 | object Spacer1: TLabel
|
---|
21 | Left = 0
|
---|
22 | Top = 0
|
---|
23 | Width = 317
|
---|
24 | Height = 13
|
---|
25 | Align = alTop
|
---|
26 | end
|
---|
27 | object lblMsg: TMemo
|
---|
28 | Left = 0
|
---|
29 | Top = 13
|
---|
30 | Width = 317
|
---|
31 | Height = 29
|
---|
32 | TabStop = False
|
---|
33 | Align = alTop
|
---|
34 | Alignment = taCenter
|
---|
35 | BorderStyle = bsNone
|
---|
36 | Color = clBtnFace
|
---|
37 | Font.Charset = DEFAULT_CHARSET
|
---|
38 | Font.Color = clWindowText
|
---|
39 | Font.Height = -11
|
---|
40 | Font.Name = 'MS Sans Serif'
|
---|
41 | Font.Style = [fsBold]
|
---|
42 | Lines.Strings = (
|
---|
43 | 'Primary Provider for this Encounter')
|
---|
44 | ParentFont = False
|
---|
45 | ReadOnly = True
|
---|
46 | TabOrder = 4
|
---|
47 | end
|
---|
48 | object cboPrimary: TORComboBox
|
---|
49 | Left = 6
|
---|
50 | Top = 69
|
---|
51 | Width = 307
|
---|
52 | Height = 180
|
---|
53 | Style = orcsSimple
|
---|
54 | AutoSelect = True
|
---|
55 | Caption = 'Primary Provider for this Encounter'
|
---|
56 | Color = clWindow
|
---|
57 | DropDownCount = 8
|
---|
58 | ItemHeight = 13
|
---|
59 | ItemTipColor = clWindow
|
---|
60 | ItemTipEnable = True
|
---|
61 | ListItemsOnly = True
|
---|
62 | LongList = True
|
---|
63 | LookupPiece = 2
|
---|
64 | MaxLength = 0
|
---|
65 | Pieces = '2,3'
|
---|
66 | Sorted = False
|
---|
67 | SynonymChars = '<>'
|
---|
68 | TabOrder = 0
|
---|
69 | TabStop = True
|
---|
70 | Visible = False
|
---|
71 | OnChange = cboPrimaryChange
|
---|
72 | OnNeedData = cboPrimaryNeedData
|
---|
73 | CharsNeedMatch = 1
|
---|
74 | end
|
---|
75 | object btnYes: TButton
|
---|
76 | Left = 158
|
---|
77 | Top = 40
|
---|
78 | Width = 75
|
---|
79 | Height = 21
|
---|
80 | Caption = '&Yes'
|
---|
81 | Default = True
|
---|
82 | ModalResult = 6
|
---|
83 | TabOrder = 1
|
---|
84 | end
|
---|
85 | object btnNo: TButton
|
---|
86 | Left = 238
|
---|
87 | Top = 40
|
---|
88 | Width = 75
|
---|
89 | Height = 21
|
---|
90 | Cancel = True
|
---|
91 | Caption = '&No'
|
---|
92 | ModalResult = 7
|
---|
93 | TabOrder = 2
|
---|
94 | end
|
---|
95 | object btnSelect: TButton
|
---|
96 | Left = 6
|
---|
97 | Top = 40
|
---|
98 | Width = 90
|
---|
99 | Height = 21
|
---|
100 | Caption = '&Select Primary'
|
---|
101 | TabOrder = 3
|
---|
102 | OnClick = btnSelectClick
|
---|
103 | end
|
---|
104 | object DKLanguageController1: TDKLanguageController
|
---|
105 | Left = 152
|
---|
106 | Top = 128
|
---|
107 | LangData = {
|
---|
108 | 0E0066726D50434550726F766964657201010000000100000007004361707469
|
---|
109 | 6F6E0106000000070053706163657231000006006C626C4D7367010100000002
|
---|
110 | 00000005004C696E6573000A0063626F5072696D617279010100000003000000
|
---|
111 | 070043617074696F6E00060062746E5965730101000000040000000700436170
|
---|
112 | 74696F6E00050062746E4E6F010100000005000000070043617074696F6E0009
|
---|
113 | 0062746E53656C656374010100000006000000070043617074696F6E00}
|
---|
114 | end
|
---|
115 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.