source: cprs/branches/foia-cprs/CPRS-Chart/fDupPts.dfm@ 495

Last change on this file since 495 was 459, checked in by Kevin Toppenberg, 16 years ago

Adding foia-cprs branch

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