Last change
on this file since 459 was 459, checked in by Kevin Toppenberg, 16 years ago |
Adding foia-cprs branch
|
File size:
2.2 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 | end
|
---|
74 | object btnYes: TButton
|
---|
75 | Left = 158
|
---|
76 | Top = 40
|
---|
77 | Width = 75
|
---|
78 | Height = 21
|
---|
79 | Caption = '&Yes'
|
---|
80 | Default = True
|
---|
81 | ModalResult = 6
|
---|
82 | TabOrder = 1
|
---|
83 | end
|
---|
84 | object btnNo: TButton
|
---|
85 | Left = 238
|
---|
86 | Top = 40
|
---|
87 | Width = 75
|
---|
88 | Height = 21
|
---|
89 | Cancel = True
|
---|
90 | Caption = '&No'
|
---|
91 | ModalResult = 7
|
---|
92 | TabOrder = 2
|
---|
93 | end
|
---|
94 | object btnSelect: TButton
|
---|
95 | Left = 6
|
---|
96 | Top = 40
|
---|
97 | Width = 90
|
---|
98 | Height = 21
|
---|
99 | Caption = '&Select Primary'
|
---|
100 | TabOrder = 3
|
---|
101 | OnClick = btnSelectClick
|
---|
102 | end
|
---|
103 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.