source: cprs/branches/tmg-cprs/CPRS-Chart/fLabPrint.dfm@ 1620

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

Initial upload of TMG-CPRS 1.0.26.69

File size: 3.8 KB
Line 
1object frmLabPrint: TfrmLabPrint
2 Left = 294
3 Top = 216
4 Width = 445
5 Height = 336
6 Caption = 'Lab Print Device Selection'
7 Color = clBtnFace
8 Font.Charset = DEFAULT_CHARSET
9 Font.Color = clWindowText
10 Font.Height = -11
11 Font.Name = 'MS Sans Serif'
12 Font.Style = []
13 OldCreateOrder = True
14 OnCreate = FormCreate
15 OnDestroy = FormDestroy
16 PixelsPerInch = 96
17 TextHeight = 13
18 object lblPrintTo: TLabel
19 Left = 7
20 Top = 270
21 Width = 3
22 Height = 13
23 end
24 object lblLabTitle: TMemo
25 Left = 8
26 Top = 8
27 Width = 301
28 Height = 53
29 TabStop = False
30 BorderStyle = bsNone
31 Color = clBtnFace
32 Lines.Strings = (
33 'Report Title, Date/Time, Location')
34 ReadOnly = True
35 TabOrder = 4
36 end
37 object grpDevice: TGroupBox
38 Left = 8
39 Top = 69
40 Width = 411
41 Height = 192
42 Caption = 'Device'
43 TabOrder = 0
44 object lblMargin: TLabel
45 Left = 8
46 Top = 166
47 Width = 60
48 Height = 13
49 AutoSize = False
50 Caption = 'Right Margin'
51 end
52 object lblLength: TLabel
53 Left = 120
54 Top = 166
55 Width = 61
56 Height = 13
57 AutoSize = False
58 Caption = 'Page Length'
59 end
60 object txtRightMargin: TMaskEdit
61 Left = 72
62 Top = 164
63 Width = 34
64 Height = 19
65 AutoSize = False
66 EditMask = '99999;0; '
67 MaxLength = 5
68 TabOrder = 1
69 end
70 object txtPageLength: TMaskEdit
71 Left = 184
72 Top = 164
73 Width = 34
74 Height = 19
75 AutoSize = False
76 EditMask = '99999;0; '
77 MaxLength = 5
78 TabOrder = 2
79 end
80 object cboDevice: TORComboBox
81 Left = 8
82 Top = 16
83 Width = 395
84 Height = 140
85 Style = orcsSimple
86 AutoSelect = True
87 Caption = 'Device'
88 Color = clWindow
89 DropDownCount = 8
90 ItemHeight = 13
91 ItemTipColor = clWindow
92 ItemTipEnable = True
93 ListItemsOnly = False
94 LongList = True
95 LookupPiece = 0
96 MaxLength = 0
97 ParentShowHint = False
98 Pieces = '2,4'
99 ShowHint = True
100 Sorted = False
101 SynonymChars = '<>'
102 TabPositions = '30'
103 TabOrder = 0
104 OnChange = cboDeviceChange
105 OnNeedData = cboDeviceNeedData
106 CharsNeedMatch = 1
107 end
108 end
109 object cmdOK: TButton
110 Left = 267
111 Top = 272
112 Width = 72
113 Height = 22
114 Caption = 'OK'
115 Default = True
116 TabOrder = 1
117 OnClick = cmdOKClick
118 end
119 object cmdCancel: TButton
120 Left = 347
121 Top = 272
122 Width = 72
123 Height = 22
124 Cancel = True
125 Caption = 'Cancel'
126 TabOrder = 2
127 OnClick = cmdCancelClick
128 end
129 object chkDefault: TCheckBox
130 Left = 7
131 Top = 288
132 Width = 173
133 Height = 17
134 Caption = 'Save as user'#39's default printer'
135 TabOrder = 3
136 end
137 object dlgWinPrinter: TPrintDialog
138 Left = 352
139 Top = 22
140 end
141 object DKLanguageController1: TDKLanguageController
142 Left = 320
143 Top = 24
144 LangData = {
145 0B0066726D4C61625072696E74010100000001000000070043617074696F6E01
146 0C0000000A006C626C5072696E74546F00000B006C626C4C61625469746C6501
147 010000000200000005004C696E65730009006772704465766963650101000000
148 03000000070043617074696F6E0009006C626C4D617267696E01010000000400
149 0000070043617074696F6E0009006C626C4C656E677468010100000005000000
150 070043617074696F6E000E0074787452696768744D617267696E00000D007478
151 74506167654C656E6774680000090063626F4465766963650101000000060000
152 00070043617074696F6E000500636D644F4B0101000000070000000700436170
153 74696F6E000900636D6443616E63656C01010000000800000007004361707469
154 6F6E000A0063686B44656661756C74010100000009000000070043617074696F
155 6E000D00646C6757696E5072696E7465720000}
156 end
157end
Note: See TracBrowser for help on using the repository browser.