मैं स्मॉलटाक स्क्वाक/फेरो


13

में प्रत्येक नए स्क्वाक/फारो छवि के साथ आसानी से देशी फोंट में कैसे बदल सकता हूं, मैं तुरंत फ़ॉन्ट को कुछ मूल संस्करण में बदलता हूं। यह बहुत सारे माउसक्लिक हैं और मैं प्रक्रिया को स्क्रिप्ट करना चाहता हूं।

  0

यह है: सही प्रकार के फोंट में बदलना। 08 jul. 092009-07-08 11:34:00

6

उत्तर मिला, SetSystemFontTo की तलाश में था। पूरा स्क्रिप्ट अब है:

"Set fonts on Mac OS X" 
defaultFont := LogicalFont familyName: 'Lucida Grande' pointSize: 10 
    stretchValue: 5 weightValue: 400 slantValue: 0. 
codeFont := LogicalFont familyName: 'Monaco' pointSize: 10 
    stretchValue: 5 weightValue: 400 slantValue: 0. 
Preferences setCodeFontTo: codeFont. 
Preferences setWindowTitleFontTo: defaultFont. 
Preferences setButtonFontTo: defaultFont. 
Preferences setListFontTo: defaultFont. 
Preferences setMenuFontTo: defaultFont. 
Preferences setSystemFontTo: defaultFont. 

8

ऊपर जवाब है, अब तक पुराना हो सकता है कम से कम यह मेरी 3.10 छवि के साथ काम नहीं करता। इसलिए, मैं इस का उपयोग करें:

defaultFont := LogicalFont familyName: 'Geneva' pointSize: 10 emphasis:0 . 
codeFont := LogicalFont familyName: 'Monaco' pointSize: 10 emphasis:0. 
Preferences setCodeFontTo: codeFont. 
Preferences setWindowTitleFontTo: defaultFont. 
Preferences setButtonFontTo: defaultFont. 
Preferences setListFontTo: defaultFont. 
Preferences setMenuFontTo: defaultFont. 
Preferences setSystemFontTo: defaultFont. 

6

यह Pharo में यह करने के लिए नया तरीका है:

|font codeFont| 

font := LogicalFont familyName: 'Bitmap DejaVu Sans' pointSize: 10. 
codeFont := LogicalFont familyName: 'Bitmap DejaVu Sans' pointSize: 9. 
StandardFonts listFont: codeFont. 
StandardFonts menuFont: font. 
StandardFonts codeFont: codeFont. 
StandardFonts buttonFont: codeFont. 
StandardFonts defaultFont: font. 
StandardFonts windowTitleFont: font. 

FreeTypeFontProvider current updateFromSystem. 

4
Pharo 2.0 के साथ

लिनक्स पर, मैं एक विशेष में एक फ़ाइल के लिए निम्न सामग्री जोड़ निर्देशिका कि छवि स्टार्टअप पर अपने आप पढ़ने के लिए है:

StartupLoader default executeAtomicItems: { 
    StartupAction 
    name: 'Use Free type' 
    code: '(Smalltalk at: #FreeTypeSystemSettings) 
    perform: #loadFt2Library: with: (true)' 
    runOnce: true. 
    StartupAction name: 'Setting up fonts' code: [ 
    |font codeFont| 

    FileStream stdout lf; nextPutAll: 'Setting up fonts'; lf. 

    font := LogicalFont familyName: 'DejaVu Sans' pointSize: 12. 
    codeFont := LogicalFont familyName: 'DejaVu Sans Mono' pointSize: 12. 
    StandardFonts listFont: codeFont. 
    StandardFonts menuFont: font. 
    StandardFonts codeFont: codeFont. 
    StandardFonts buttonFont: codeFont. 
    StandardFonts defaultFont: font. 
    StandardFonts windowTitleFont: font. 
    StandardFonts balloonFont: font. 
    StandardFonts haloFont: font. 

    FileStream stdout lf; nextPutAll: 'Finished'; lf]. 
}. 

इस विशेष निर्देशिका

के साथ पता चला जा सकता है
FileDirectory preferencesVersionFolder 

आपको स्टार्टअप लोडर क्लास के दस्तावेज़ को पढ़ना चाहिए।