source: cprs/branches/tmg-cprs/CPRS-Chart/Encounter/fDiagnoses.dfm@ 1743

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

Initial upload of TMG-CPRS 1.0.26.69

File size: 3.6 KB
RevLine 
[453]1inherited frmDiagnoses: TfrmDiagnoses
2 Left = 304
3 Top = 169
4 Caption = 'Encounter Diagnoses'
5 PixelsPerInch = 96
6 TextHeight = 13
7 object lblAdd2PL: TLabel [0]
8 Left = 555
9 Top = 255
10 Width = 53
11 Height = 26
12 Caption = 'Add to Problem list'
13 WordWrap = True
14 end
15 inherited lblSection: TLabel
16 Width = 89
17 Caption = 'Diagnoses Section'
18 end
19 inherited btnOK: TBitBtn
20 TabOrder = 7
21 end
22 inherited btnCancel: TBitBtn
23 TabOrder = 8
24 end
25 inherited pnlGrid: TPanel
26 Width = 523
27 TabOrder = 1
28 inherited lbGrid: TORListBox
29 Tag = 20
30 Width = 523
31 Pieces = '1,2,3'
32 end
33 inherited hcGrid: THeaderControl
34 Width = 523
35 Sections = <
36 item
37 ImageIndex = -1
38 MinWidth = 60
39 Text = 'Add to PL'
40 Width = 60
41 end
42 item
43 ImageIndex = -1
44 MinWidth = 65
45 Text = 'Primary'
46 Width = 65
47 end
48 item
49 ImageIndex = -1
50 MinWidth = 110
51 Text = 'Selected Diagnoses'
52 Width = 110
53 end>
54 end
55 end
56 inherited edtComment: TCaptionEdit
57 TabOrder = 3
58 end
59 inherited btnRemove: TButton
60 TabOrder = 6
61 end
62 object cmdDiagPrimary: TButton [10]
63 Left = 536
64 Top = 306
65 Width = 75
66 Height = 21
67 Caption = 'Primary'
68 Enabled = False
69 TabOrder = 5
70 OnClick = cmdDiagPrimaryClick
71 end
72 object ckbDiagProb: TCheckBox [11]
73 Left = 536
74 Top = 262
75 Width = 13
76 Height = 13
77 Caption = 'Add to Problem list'
78 TabOrder = 4
79 OnClick = ckbDiagProbClicked
80 end
81 inherited btnSelectAll: TButton
82 Left = 454
83 TabOrder = 2
84 TabStop = True
85 end
86 inherited pnlMain: TPanel
87 TabOrder = 0
88 inherited lbxSection: TORListBox
89 Tag = 20
90 Height = 196
91 IntegralHeight = True
92 Pieces = '2,3,4,5'
93 end
94 inherited pnlLeft: TPanel
95 inherited lbSection: TORListBox
96 Tag = 20
97 TabOrder = 0
98 end
99 inherited btnOther: TButton
100 Tag = 12
101 Caption = 'Other Diagnosis...'
102 TabOrder = 1
103 end
104 end
105 end
106 inherited DKLanguageController1: TDKLanguageController
107 LangData = {
108 0C0066726D446961676E6F736573010100000001000000070043617074696F6E
109 0115000000050062746E4F4B010100000002000000070043617074696F6E0009
110 0062746E43616E63656C010100000003000000070043617074696F6E00070070
111 6E6C47726964010100000004000000070043617074696F6E0006006C62477269
112 640000060068634772696401030000000E000000100053656374696F6E735B30
113 5D2E546578740F000000100053656374696F6E735B315D2E5465787410000000
114 100053656374696F6E735B325D2E54657874000A006C626C53656374696F6E01
115 0100000005000000070043617074696F6E0007006C626C4C6973740101000000
116 06000000070043617074696F6E000A006C626C436F6D6D656E74010100000007
117 000000070043617074696F6E00070062766C4D61696E00000A00656474436F6D
118 6D656E74010100000008000000070043617074696F6E00090062746E52656D6F
119 7665010100000009000000070043617074696F6E000C0062746E53656C656374
120 416C6C01010000000A000000070043617074696F6E000700706E6C4D61696E00
121 00070073706C4C65667400000A006C627853656374696F6E01010000000B0000
122 00070043617074696F6E000700706E6C4C656674000009006C6253656374696F
123 6E01010000000C000000070043617074696F6E00080062746E4F746865720101
124 0000000D000000070043617074696F6E0009006C626C41646432504C01010000
125 0011000000070043617074696F6E000E00636D64446961675072696D61727901
126 0100000012000000070043617074696F6E000B00636B624469616750726F6201
127 0100000013000000070043617074696F6E00}
128 end
129end
Note: See TracBrowser for help on using the repository browser.