source: cprs/branches/tmg-cprs/CPRS-Chart/Consults/fConsult513Prt.dfm@ 797

Last change on this file since 797 was 793, checked in by Kevin Toppenberg, 14 years ago

update

File size: 3.5 KB
Line 
1object frm513Print: Tfrm513Print
2 Left = 359
3 Top = 239
4 AutoScroll = False
5 Caption = 'Print SF 513'
6 ClientHeight = 308
7 ClientWidth = 427
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 OnDestroy = FormDestroy
18 PixelsPerInch = 96
19 TextHeight = 13
20 object lblPrintTo: TLabel
21 Left = 7
22 Top = 265
23 Width = 3
24 Height = 13
25 end
26 object lblConsultTitle: TMemo
27 Left = 10
28 Top = 8
29 Width = 301
30 Height = 53
31 BorderStyle = bsNone
32 Color = clBtnFace
33 Lines.Strings = (
34 'Consult Title, Date/Time of Consult, Location')
35 ReadOnly = True
36 TabOrder = 0
37 end
38 object grpChooseCopy: TGroupBox
39 Left = 321
40 Top = 4
41 Width = 98
42 Height = 61
43 Caption = 'Print'
44 TabOrder = 1
45 object radChartCopy: TRadioButton
46 Left = 8
47 Top = 16
48 Width = 81
49 Height = 17
50 Caption = '&Chart Copy'
51 Checked = True
52 TabOrder = 0
53 TabStop = True
54 OnClick = radChartCopyClick
55 end
56 object radWorkCopy: TRadioButton
57 Left = 8
58 Top = 36
59 Width = 81
60 Height = 17
61 Caption = '&Work Copy'
62 TabOrder = 1
63 OnClick = radWorkCopyClick
64 end
65 end
66 object grpDevice: TGroupBox
67 Left = 8
68 Top = 69
69 Width = 411
70 Height = 192
71 Caption = 'Device'
72 TabOrder = 2
73 object lblMargin: TLabel
74 Left = 8
75 Top = 166
76 Width = 60
77 Height = 13
78 Caption = 'Right Margin'
79 end
80 object lblLength: TLabel
81 Left = 120
82 Top = 166
83 Width = 61
84 Height = 13
85 Caption = 'Page Length'
86 end
87 object txtRightMargin: TMaskEdit
88 Left = 72
89 Top = 164
90 Width = 34
91 Height = 19
92 AutoSize = False
93 EditMask = '99999;0; '
94 MaxLength = 5
95 TabOrder = 1
96 end
97 object txtPageLength: TMaskEdit
98 Left = 184
99 Top = 164
100 Width = 34
101 Height = 19
102 AutoSize = False
103 EditMask = '99999;0; '
104 MaxLength = 5
105 TabOrder = 2
106 end
107 object cboDevice: TORComboBox
108 Left = 8
109 Top = 16
110 Width = 395
111 Height = 140
112 Style = orcsSimple
113 AutoSelect = True
114 Caption = 'Device'
115 Color = clWindow
116 DropDownCount = 8
117 ItemHeight = 13
118 ItemTipColor = clWindow
119 ItemTipEnable = True
120 ListItemsOnly = True
121 LongList = True
122 LookupPiece = 0
123 MaxLength = 0
124 ParentShowHint = False
125 Pieces = '2,4'
126 ShowHint = True
127 Sorted = False
128 SynonymChars = '<>'
129 TabPositions = '30'
130 TabOrder = 0
131 OnChange = cboDeviceChange
132 OnNeedData = cboDeviceNeedData
133 CharsNeedMatch = 1
134 end
135 end
136 object cmdOK: TButton
137 Left = 267
138 Top = 272
139 Width = 72
140 Height = 22
141 Caption = 'OK'
142 Default = True
143 TabOrder = 4
144 OnClick = cmdOKClick
145 end
146 object cmdCancel: TButton
147 Left = 347
148 Top = 272
149 Width = 72
150 Height = 22
151 Cancel = True
152 Caption = 'Cancel'
153 TabOrder = 5
154 OnClick = cmdCancelClick
155 end
156 object chkDefault: TCheckBox
157 Left = 7
158 Top = 288
159 Width = 166
160 Height = 17
161 Caption = 'Save as user'#39's default printer'
162 TabOrder = 3
163 end
164 object dlgWinPrinter: TPrintDialog
165 Left = 268
166 Top = 26
167 end
168end
Note: See TracBrowser for help on using the repository browser.