equal
deleted
inserted
replaced
19 LeftMargin BottomMargin RightMargin SupportsColor Resolution' |
19 LeftMargin BottomMargin RightMargin SupportsColor Resolution' |
20 poolDictionaries:'' |
20 poolDictionaries:'' |
21 category:'Streams-External' |
21 category:'Streams-External' |
22 ! |
22 ! |
23 |
23 |
24 !PostscriptPrinterStream class methodsFor:'documentation'! |
24 !PostscriptPrinterStream class methodsFor:'documentation'! |
25 |
25 |
26 copyright |
26 copyright |
27 " |
27 " |
28 COPYRIGHT (c) 1988 by Claus Gittinger |
28 COPYRIGHT (c) 1988 by Claus Gittinger |
29 All Rights Reserved |
29 All Rights Reserved |
243 (Image fromFile:'bitmaps/SBrowser.xbm') displayOn:drawable at:(50@30). |
243 (Image fromFile:'bitmaps/SBrowser.xbm') displayOn:drawable at:(50@30). |
244 [exEnd] |
244 [exEnd] |
245 " |
245 " |
246 ! ! |
246 ! ! |
247 |
247 |
248 !PostscriptPrinterStream class methodsFor:'initialization'! |
248 !PostscriptPrinterStream class methodsFor:'initialization'! |
249 |
249 |
250 initCharacterSize |
250 initCharacterSize |
251 "setup the character parameters" |
251 "setup the character parameters" |
252 |
252 |
253 FontHeight := 200. "/ used to scale fonts - corresponds to a 10 point font size |
253 FontHeight := 200. "/ used to scale fonts - corresponds to a 10 point font size |
520 self initProlog. |
520 self initProlog. |
521 |
521 |
522 "Created: 31.5.1996 / 23:35:18 / cg" |
522 "Created: 31.5.1996 / 23:35:18 / cg" |
523 ! ! |
523 ! ! |
524 |
524 |
525 !PostscriptPrinterStream class methodsFor:'accessing - defaults'! |
525 !PostscriptPrinterStream class methodsFor:'accessing - defaults'! |
526 |
526 |
527 bottomMargin |
527 bottomMargin |
528 "return the bottom margin (in inches)" |
528 "return the bottom margin (in inches)" |
529 |
529 |
530 ^ BottomMargin |
530 ^ BottomMargin |
622 |
622 |
623 "Modified: 3.6.1996 / 10:47:26 / cg" |
623 "Modified: 3.6.1996 / 10:47:26 / cg" |
624 "Created: 5.9.1996 / 21:41:55 / cg" |
624 "Created: 5.9.1996 / 21:41:55 / cg" |
625 ! ! |
625 ! ! |
626 |
626 |
627 !PostscriptPrinterStream class methodsFor:'queries'! |
627 !PostscriptPrinterStream class methodsFor:'queries'! |
628 |
628 |
629 printerTypeName |
629 printerTypeName |
630 "return a descriptive name" |
630 "return a descriptive name" |
631 |
631 |
632 ^ 'postscript printer' |
632 ^ 'postscript printer' |
716 |
716 |
717 "Modified: 23.4.1996 / 20:05:59 / cg" |
717 "Modified: 23.4.1996 / 20:05:59 / cg" |
718 ! ! |
718 ! ! |
719 |
719 |
720 !PostscriptPrinterStream methodsFor:'accessing'! |
720 !PostscriptPrinterStream methodsFor:'accessing'! |
|
721 |
|
722 colNr |
|
723 "return the current column-Nr (within the line)" |
|
724 |
|
725 ^ colNr |
|
726 |
|
727 "Created: 2.1.1997 / 13:29:55 / cg" |
|
728 ! |
|
729 |
|
730 lineNr |
|
731 "return the current line-Nr (within the page)" |
|
732 |
|
733 ^ lineNr |
|
734 |
|
735 "Created: 2.1.1997 / 13:29:38 / cg" |
|
736 ! |
721 |
737 |
722 pageCount |
738 pageCount |
723 "returns the number of the currently printed page" |
739 "returns the number of the currently printed page" |
724 |
740 |
725 ^ pageCount |
741 ^ pageCount |
1087 |
1103 |
1088 "Modified: 30.5.1996 / 16:48:48 / ca" |
1104 "Modified: 30.5.1996 / 16:48:48 / ca" |
1089 "Modified: 1.6.1996 / 13:15:23 / cg" |
1105 "Modified: 1.6.1996 / 13:15:23 / cg" |
1090 ! ! |
1106 ! ! |
1091 |
1107 |
1092 !PostscriptPrinterStream class methodsFor:'documentation'! |
1108 !PostscriptPrinterStream class methodsFor:'documentation'! |
1093 |
1109 |
1094 version |
1110 version |
1095 ^ '$Header: /cvs/stx/stx/libbasic2/PostscriptPrinterStream.st,v 1.48 1996-10-01 18:44:35 cg Exp $' |
1111 ^ '$Header: /cvs/stx/stx/libbasic2/PostscriptPrinterStream.st,v 1.49 1997-01-02 12:30:12 cg Exp $' |
1096 ! ! |
1112 ! ! |
1097 PostscriptPrinterStream initialize! |
1113 PostscriptPrinterStream initialize! |