DeviceWorkstation.st
changeset 5187 11ec8382a21c
parent 5172 cce243c7db57
child 5206 a4a76ab06190
equal deleted inserted replaced
5186:adffd6f387e7 5187:11ec8382a21c
  5127      - used when class Font cannot find anything usable"
  5127      - used when class Font cannot find anything usable"
  5128 
  5128 
  5129     ^ self subclassResponsibility
  5129     ^ self subclassResponsibility
  5130 !
  5130 !
  5131 
  5131 
  5132 getFontWithFamily:familyString face:faceString style:styleString size:sizeArgOrNil encoding:encodingSym
  5132 getFontWithFamily:familyString face:faceString style:styleString size:sizeArg encoding:encodingSym
  5133     "try to get the specified font, return id.
  5133     "try to get the specified font, return id.
  5134      If not available, try next smaller font.
  5134      If not available, try next smaller font.
  5135      If no font fits, return nil"
  5135      If no font fits, return nil"
  5136 
  5136 
  5137     ^ self 
  5137     ^ self 
  5138         getFontWithFamily:familyString 
  5138         getFontWithFamily:familyString 
  5139         face:faceString 
  5139         face:faceString 
  5140         style:styleString 
  5140         style:styleString 
  5141         size:sizeArgOrNil 
  5141         size:sizeArg 
  5142         pixelSize:nil 
  5142         sizeUnit:#pt
  5143         encoding:encodingSym
  5143         encoding:encodingSym
  5144 !
  5144 !
  5145 
  5145 
  5146 getFontWithFamily:familyString face:faceString style:styleString size:sizeArgOrNil pixelSize:pixelSizeArgOrNil encoding:encodingSym
  5146 getFontWithFamily:familyString face:faceString style:styleString size:sizeArg sizeUnit:sizeUnit encoding:encodingSym
  5147     "try to get the specified font, return id.
  5147     "try to get the specified font, return id.
  5148      If not available, try next smaller font.
  5148      If not available, try next smaller font.
  5149      If no font fits, return nil"
  5149      If no font fits, return nil"
  5150 
  5150 
  5151     ^ self subclassResponsibility
  5151     ^ self subclassResponsibility
  7907 ! !
  7907 ! !
  7908 
  7908 
  7909 !DeviceWorkstation class methodsFor:'documentation'!
  7909 !DeviceWorkstation class methodsFor:'documentation'!
  7910 
  7910 
  7911 version
  7911 version
  7912     ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.528 2009-02-17 18:18:05 cg Exp $'
  7912     ^ '$Header: /cvs/stx/stx/libview/DeviceWorkstation.st,v 1.529 2009-02-18 17:56:36 cg Exp $'
  7913 ! !
  7913 ! !
  7914 
  7914 
  7915 DeviceWorkstation initialize!
  7915 DeviceWorkstation initialize!