close Warning: Can't use blame annotator: 
svn blame failed on cprs/branches/tmg-cprs/CPRS-Chart/fPtDemo.dfm: 'GenericSWIGWrapper' object has no attribute '_wrap'

source: cprs/branches/tmg-cprs/CPRS-Chart/fPtDemo.dfm@ 541

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

Initial upload of TMG-CPRS 1.0.26.69
File size: 3.0 KB
RevLine 
1object frmPtDemo: TfrmPtDemo
2 Left = 169
3 Top = 320
4 Width = 590
5 Height = 300
6 BorderIcons = [biSystemMenu]
7 Caption = 'Patient Inquiry'
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 = True
15 Position = poScreenCenter
16 OnCreate = FormCreate
17 PixelsPerInch = 96
18 TextHeight = 13
19 object lblFontTest: TLabel
20 Left = 264
21 Top = 148
22 Width = 77
23 Height = 14
24 Caption = 'lblFontTest'
25 Font.Charset = ANSI_CHARSET
26 Font.Color = clWindowText
27 Font.Height = -11
28 Font.Name = 'Courier New'
29 Font.Style = []
30 ParentFont = False
31 Visible = False
32 end
33 object memPtDemo: TRichEdit
34 Left = 0
35 Top = 0
36 Width = 582
37 Height = 229
38 Align = alClient
39 Color = clCream
40 Font.Charset = ANSI_CHARSET
41 Font.Color = clWindowText
42 Font.Height = -11
43 Font.Name = 'Courier New'
44 Font.Style = []
45 Lines.Strings = (
46
47 'ABCDEFGHIJKLMNOPQRSTUVWXYZ0123ABCDEFGHIJKLMNOPQRSTUVWXYZ0123abcd' +
48 'efghijklmnopqrs')
49 ParentFont = False
50 PlainText = True
51 ReadOnly = True
52 ScrollBars = ssBoth
53 TabOrder = 0
54 WantReturns = False
55 WordWrap = False
56 end
57 object pnlTop: TORAutoPanel
58 Left = 0
59 Top = 229
60 Width = 582
61 Height = 37
62 Align = alBottom
63 BevelOuter = bvNone
64 TabOrder = 1
65 object cmdNewPt: TButton
66 Left = 8
67 Top = 8
68 Width = 121
69 Height = 21
70 Caption = 'Select New Patient'
71 TabOrder = 0
72 OnClick = cmdNewPtClick
73 end
74 object cmdClose: TButton
75 Left = 501
76 Top = 8
77 Width = 72
78 Height = 21
79 Cancel = True
80 Caption = 'Close'
81 Default = True
82 TabOrder = 2
83 OnClick = cmdCloseClick
84 end
85 object cmdPrint: TButton
86 Left = 411
87 Top = 8
88 Width = 75
89 Height = 21
90 Caption = 'Print'
91 TabOrder = 1
92 OnClick = cmdPrintClick
93 end
94 object EditaPtButton: TButton
95 Left = 144
96 Top = 8
97 Width = 145
98 Height = 21
99 Caption = '&Edit Patient Demographics'
100 TabOrder = 3
101 OnClick = EditaPtButtonClick
102 end
103 end
104 object dlgPrintReport: TPrintDialog
105 Left = 289
106 Top = 237
107 end
108 object DKLanguageController1: TDKLanguageController
109 Left = 328
110 Top = 237
111 LangData = {
112 090066726D507444656D6F010100000001000000070043617074696F6E010800
113 00000B006C626C466F6E7454657374010100000002000000070043617074696F
114 6E0009006D656D507444656D6F01010000000300000005004C696E6573000600
115 706E6C546F7000000800636D644E657750740101000000040000000700436170
116 74696F6E000800636D64436C6F7365010100000005000000070043617074696F
117 6E000800636D645072696E74010100000006000000070043617074696F6E000E
118 00646C675072696E745265706F727400000D0045646974615074427574746F6E
119 010100000007000000070043617074696F6E00}
120 end
121end
Note: See TracBrowser for help on using the repository browser.