source: cprs/trunk/CPRS-Chart/fDupPts.dfm

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

Upgrading to version 27

File size: 2.6 KB
Line 
1inherited frmDupPts: TfrmDupPts
2 Left = 160
3 Top = 190
4 HorzScrollBar.Visible = False
5 VertScrollBar.Visible = False
6 Caption = 'Similar Patients'
7 ClientHeight = 187
8 ClientWidth = 463
9 Position = poScreenCenter
10 OnCreate = FormCreate
11 PixelsPerInch = 96
12 TextHeight = 13
13 object pnlDupPts: TPanel [0]
14 Left = 0
15 Top = 0
16 Width = 463
17 Height = 187
18 Align = alClient
19 TabOrder = 0
20 DesignSize = (
21 463
22 187)
23 object lblSelDupPts: TLabel
24 Left = 6
25 Top = 3
26 Width = 155
27 Height = 13
28 Caption = 'Please select the correct patient:'
29 end
30 object btnOK: TButton
31 Left = 296
32 Top = 150
33 Width = 75
34 Height = 25
35 Anchors = [akRight, akBottom]
36 Caption = '&OK'
37 Default = True
38 TabOrder = 0
39 OnClick = btnOKClick
40 end
41 object btnCancel: TButton
42 Left = 381
43 Top = 150
44 Width = 75
45 Height = 25
46 Anchors = [akRight, akBottom]
47 Caption = '&Cancel'
48 ModalResult = 2
49 TabOrder = 1
50 OnClick = btnCancelClick
51 end
52 object pnlSelDupPt: TPanel
53 Left = 2
54 Top = 19
55 Width = 461
56 Height = 120
57 Anchors = [akLeft, akTop, akRight, akBottom]
58 TabOrder = 2
59 object lblDupPts: TLabel
60 Left = 4
61 Top = 2
62 Width = 364
63 Height = 13
64 Caption =
65 ' Name DOB' +
66 ' SSN'
67 end
68 object lboSelPt: TORListBox
69 Left = 1
70 Top = 16
71 Width = 459
72 Height = 103
73 Align = alBottom
74 Anchors = [akLeft, akTop, akRight, akBottom]
75 ItemHeight = 13
76 ParentShowHint = False
77 ShowHint = True
78 TabOrder = 0
79 OnDblClick = lboSelPtDblClick
80 Caption = 'Please select the correct patient'
81 ItemTipColor = clWindow
82 LongList = False
83 Pieces = '2,3,4'
84 TabPositions = '33,57'
85 end
86 end
87 end
88 inherited amgrMain: TVA508AccessibilityManager
89 Data = (
90 (
91 'Component = pnlDupPts'
92 'Status = stsDefault')
93 (
94 'Component = btnOK'
95 'Status = stsDefault')
96 (
97 'Component = btnCancel'
98 'Status = stsDefault')
99 (
100 'Component = pnlSelDupPt'
101 'Status = stsDefault')
102 (
103 'Component = lboSelPt'
104 'Status = stsDefault')
105 (
106 'Component = frmDupPts'
107 'Status = stsDefault'))
108 end
109end
Note: See TracBrowser for help on using the repository browser.