source: cprs/branches/foia-cprs/CPRS-Chart/Encounter/fPCEEdit.dfm@ 1008

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

Adding foia-cprs branch

File size: 1.8 KB
Line 
1object frmPCEEdit: TfrmPCEEdit
2 Left = 214
3 Top = 107
4 BorderStyle = bsDialog
5 Caption = 'Edit Encounter'
6 ClientHeight = 128
7 ClientWidth = 543
8 Color = clBtnFace
9 Font.Charset = DEFAULT_CHARSET
10 Font.Color = clWindowText
11 Font.Height = -11
12 Font.Name = 'MS Sans Serif'
13 Font.Style = []
14 OldCreateOrder = False
15 Position = poScreenCenter
16 OnCreate = FormCreate
17 DesignSize = (
18 543
19 128)
20 PixelsPerInch = 96
21 TextHeight = 13
22 object Label1: TStaticText
23 Left = 0
24 Top = 0
25 Width = 543
26 Height = 24
27 Align = alTop
28 Alignment = taCenter
29 Caption = 'Select Encounter to Edit'
30 Font.Charset = DEFAULT_CHARSET
31 Font.Color = clWindowText
32 Font.Height = -16
33 Font.Name = 'MS Sans Serif'
34 Font.Style = [fsBold]
35 ParentFont = False
36 TabOrder = 5
37 end
38 object lblNew: TMemo
39 Left = 136
40 Top = 32
41 Width = 401
42 Height = 26
43 TabStop = False
44 BorderStyle = bsNone
45 Color = clBtnFace
46 Lines.Strings = (
47 'New')
48 TabOrder = 3
49 end
50 object lblNote: TMemo
51 Left = 136
52 Top = 73
53 Width = 401
54 Height = 26
55 TabStop = False
56 BorderStyle = bsNone
57 Color = clBtnFace
58 Lines.Strings = (
59 'Note')
60 TabOrder = 4
61 end
62 object btnNew: TButton
63 Left = 8
64 Top = 28
65 Width = 121
66 Height = 21
67 Caption = 'Edit Current Encounter'
68 ModalResult = 6
69 TabOrder = 0
70 end
71 object btnNote: TButton
72 Left = 8
73 Top = 69
74 Width = 121
75 Height = 21
76 Caption = 'Edit Note Encounter'
77 ModalResult = 7
78 TabOrder = 1
79 end
80 object btnCancel: TButton
81 Left = 465
82 Top = 104
83 Width = 75
84 Height = 21
85 Anchors = [akRight, akBottom]
86 Cancel = True
87 Caption = '&Cancel'
88 ModalResult = 2
89 TabOrder = 2
90 end
91end
Note: See TracBrowser for help on using the repository browser.