equal
deleted
inserted
replaced
34 ! |
34 ! |
35 |
35 |
36 documentation |
36 documentation |
37 " |
37 " |
38 a stream for printing; this (concrete or abstract) class can handle only |
38 a stream for printing; this (concrete or abstract) class can handle only |
39 very dumb printers. More intelligence is added by subclasses (see |
39 very dumb printers. No attributes (italic, bold etc) and no multiple fonts |
40 PostscriptPrinterStream among others.) |
40 are supported - just plain single font text printing. |
|
41 |
|
42 More intelligence is added by subclasses (see PostscriptPrinterStream among others.) |
41 " |
43 " |
42 ! |
44 ! |
43 |
45 |
44 version |
46 version |
45 ^ '$Header: /cvs/stx/stx/libbasic2/PrinterStream.st,v 1.14 1996-01-05 14:09:11 cg Exp $' |
47 ^ '$Header: /cvs/stx/stx/libbasic2/PrinterStream.st,v 1.15 1996-02-02 19:53:52 cg Exp $' |
|
48 ! ! |
|
49 |
|
50 !PrinterStream class methodsFor:'queries'! |
|
51 |
|
52 printerTypeName |
|
53 "return a descriptive name" |
|
54 |
|
55 ^ 'dump printer' |
46 ! ! |
56 ! ! |
47 |
57 |
48 !PrinterStream class methodsFor:'initialization'! |
58 !PrinterStream class methodsFor:'initialization'! |
49 |
59 |
50 initialize |
60 initialize |
126 |
136 |
127 super nextPut:(Character cr). |
137 super nextPut:(Character cr). |
128 self spaces:LeftMargin |
138 self spaces:LeftMargin |
129 ! |
139 ! |
130 |
140 |
|
141 escape:aCharacter |
|
142 "since its so common, this method sends escape followed by aCharacter" |
|
143 |
|
144 super nextPut:(Character escape); nextPut:aCharacter |
|
145 ! |
|
146 |
|
147 escapeAll:aString |
|
148 "since its so common, this method sends escape followed by aString" |
|
149 |
|
150 super nextPut:(Character escape); nextPutAll:aString |
|
151 ! |
|
152 |
131 helvetica |
153 helvetica |
132 "set font to helvetic |
154 "set font to helvetic |
133 - ignore here, since this class does not know anything about the printer" |
155 - ignore here, since this class does not know anything about the printer" |
134 |
156 |
135 ^ self |
157 ^ self |