395 ^ 'dumb printer' |
395 ^ 'dumb printer' |
396 |
396 |
397 "Modified: 18.4.1996 / 20:04:12 / cg" |
397 "Modified: 18.4.1996 / 20:04:12 / cg" |
398 ! |
398 ! |
399 |
399 |
|
400 supportsColor |
|
401 "return true if this is a color printer" |
|
402 |
|
403 ^ false |
|
404 |
|
405 "Created: 3.6.1996 / 18:00:36 / cg" |
|
406 ! |
|
407 |
400 supportsMargins |
408 supportsMargins |
401 "return true if this printer supports margin settings" |
409 "return true if this printer supports margin settings (in inches) |
|
410 if not, it supports at least a leftMargin to be specified in columns." |
402 |
411 |
403 ^ false |
412 ^ false |
404 |
413 |
405 "Created: 3.6.1996 / 10:47:54 / cg" |
414 "Created: 3.6.1996 / 10:47:54 / cg" |
|
415 "Modified: 3.6.1996 / 18:24:20 / cg" |
406 ! |
416 ! |
407 |
417 |
408 supportsPageSizes |
418 supportsPageSizes |
409 "return true if this printer supports different page sizes" |
419 "return true if this printer supports different page sizes" |
410 |
420 |
499 super nextPut:aCharacter |
509 super nextPut:aCharacter |
500 |
510 |
501 "Modified: 10.4.1996 / 13:08:28 / cg" |
511 "Modified: 10.4.1996 / 13:08:28 / cg" |
502 ! ! |
512 ! ! |
503 |
513 |
504 !PrinterStream methodsFor:'accessing'! |
|
505 |
|
506 pageFormat |
|
507 ^ self class pageFormat |
|
508 |
|
509 "Modified: 3.6.1996 / 10:27:45 / cg" |
|
510 ! ! |
|
511 |
|
512 !PrinterStream methodsFor:'emphasis change'! |
514 !PrinterStream methodsFor:'emphasis change'! |
513 |
515 |
514 bold |
516 bold |
515 "set emphasis to bold |
517 "set emphasis to bold |
516 - ignore here, since this class does not know anything about the printer" |
518 - ignore here, since this class does not know anything about the printer" |
674 "Modified: 1.6.1996 / 00:13:23 / cg" |
676 "Modified: 1.6.1996 / 00:13:23 / cg" |
675 ! ! |
677 ! ! |
676 |
678 |
677 !PrinterStream methodsFor:'queries'! |
679 !PrinterStream methodsFor:'queries'! |
678 |
680 |
|
681 bottomInset |
|
682 ^ self class bottomInset |
|
683 |
|
684 "Modified: 3.6.1996 / 10:27:45 / cg" |
|
685 "Created: 3.6.1996 / 18:24:40 / cg" |
|
686 ! |
|
687 |
679 isPrinterStream |
688 isPrinterStream |
680 "return true, if this is a printerStream. |
689 "return true, if this is a printerStream. |
681 Always true here." |
690 Always true here." |
682 |
691 |
683 ^ true |
692 ^ true |
684 |
693 |
685 "Created: 3.6.1996 / 12:06:21 / cg" |
694 "Created: 3.6.1996 / 12:06:21 / cg" |
686 ! |
695 ! |
687 |
696 |
|
697 leftInset |
|
698 ^ self class leftInset |
|
699 |
|
700 "Modified: 3.6.1996 / 10:27:45 / cg" |
|
701 "Created: 3.6.1996 / 18:23:07 / cg" |
|
702 ! |
|
703 |
688 lineLength |
704 lineLength |
689 "the printer pages width (in characters)" |
705 "the printer pages width (in characters)" |
690 |
706 |
691 ^ 80 |
707 ^ 80 |
|
708 ! |
|
709 |
|
710 pageFormat |
|
711 ^ self class pageFormat |
|
712 |
|
713 "Modified: 3.6.1996 / 10:27:45 / cg" |
|
714 ! |
|
715 |
|
716 supportsColor |
|
717 "return true if this is a color printer" |
|
718 |
|
719 ^ self class supportsColor |
|
720 |
|
721 "Created: 3.6.1996 / 18:00:27 / cg" |
|
722 ! |
|
723 |
|
724 supportsMargins |
|
725 "return true if this printer supports margin settings (in inches) |
|
726 if not, it supports at least a leftMargin to be specified in columns." |
|
727 |
|
728 ^ self class supportsMargins |
|
729 |
|
730 "Created: 3.6.1996 / 17:59:35 / cg" |
|
731 "Modified: 3.6.1996 / 18:24:04 / cg" |
|
732 ! |
|
733 |
|
734 supportsPostscript |
|
735 "return true if this is a postscript printer" |
|
736 |
|
737 ^ self class supportsPostscript |
|
738 |
|
739 "Created: 3.6.1996 / 17:59:58 / cg" |
|
740 ! |
|
741 |
|
742 topInset |
|
743 ^ self class topInset |
|
744 |
|
745 "Modified: 3.6.1996 / 10:27:45 / cg" |
|
746 "Created: 3.6.1996 / 18:24:37 / cg" |
692 ! ! |
747 ! ! |
693 |
748 |
694 !PrinterStream class methodsFor:'documentation'! |
749 !PrinterStream class methodsFor:'documentation'! |
695 |
750 |
696 version |
751 version |
697 ^ '$Header: /cvs/stx/stx/libbasic2/PrinterStream.st,v 1.33 1996-06-03 15:17:19 cg Exp $' |
752 ^ '$Header: /cvs/stx/stx/libbasic2/PrinterStream.st,v 1.34 1996-06-03 17:06:17 cg Exp $' |
698 ! ! |
753 ! ! |
699 PrinterStream initialize! |
754 PrinterStream initialize! |