File Manager

X7ROOT File Manager

Current Path: /lib64/tcl8.6/Tix8.4.3/pref

?? ..
?? 10Point.fs(641 B)
?? 10Point.fsc(2 KB)
?? 12Point.fs(640 B)
?? 12Point.fsc(2 KB)
?? 14Point.fs(639 B)
?? 14Point.fsc(2.06 KB)
?? Bisque.cs(1 KB)
?? Bisque.csc(22.01 KB)
?? Blue.cs(1.02 KB)
?? Blue.csc(22.02 KB)
?? Gray.cs(1.02 KB)
?? Gray.csc(22.02 KB)
?? Old12Pt.fs(541 B)
?? Old14Pt.fs(499 B)
?? SGIGray.cs(1 KB)
?? SGIGray.csc(22.01 KB)
?? TK.cs(1 KB)
?? TK.csc(1.98 KB)
?? TK.fs(506 B)
?? TK.fsc(569 B)
?? TixGray.cs(1 KB)
?? TixGray.csc(22.01 KB)
?? TkWin.cs(2.19 KB)
?? TkWin.csc(21.78 KB)
?? TkWin.fs(390 B)
?? TkWin.fsc(1.63 KB)
?? WmDefault.cs(1.42 KB)
?? WmDefault.csc(14.22 KB)
?? WmDefault.fs(755 B)
?? WmDefault.fsc(2.13 KB)
?? WmDefault.py(3.42 KB)
?? WmDefault.tcl(33.05 KB)
?? WmDefault.txt(4.22 KB)
?? pkgIndex.tcl(262 B)

Editing: WmDefault.fsc

# -*-mode: tcl; fill-column: 75; tab-width: 8; coding: iso-latin-1-unix -*-
#
#	$Id: WmDefault.fsc,v 1.2 2001/12/09 05:03:09 idiscovery Exp $
#
#

proc tixPref:InitFontSet:WmDefault {} { 
    global tixOption

package require wm_default
    if {1 || ![info exists ::wm_default::wm]} {
	wm_default::setup
	wm_default::addoptions
    }

set tixOption(font) 	$::wm_default::system_font
    set tixOption(bold_font)    [concat $::wm_default::system_font bold]
    set tixOption(menu_font)    $::wm_default::menu_font        
    set tixOption(italic_font)  [concat $::wm_default::system_font italic]
    set tixOption(fixed_font)   $::wm_default::fixed_font
    set tixOption(border1)      $::wm_default::borderwidth

}

proc tixPref:SetFontSet:WmDefault {} { 
    global tixOption

package require wm_default
    if {1 || ![info exists ::wm_default::wm]} {
	wm_default::setup
	wm_default::addoptions
    }

set pri $tixOption(prioLevel)

option add *TixBalloon*Label.font 		$tixOption(font) $pri
    option add *TixBitmapButton*label.font 	$tixOption(font) $pri
    option add *TixControl*label.font          	$tixOption(font) $pri
    option add *TixLabelEntry*label.font       	$tixOption(font) $pri
    option add *TixLabelFrame*label.font 	$tixOption(font) $pri
    option add *TixMenu.font			$tixOption(menu_font) $pri
    option add *TixMwmClient*title.font		$tixOption(font) $pri
    option add *TixNoteBook.nbframe.font	$tixOption(font) $pri
    # Although its a menubutton, it's more like a button than a menu IMHO
    option add *TixOptionMenu*menubutton.font	$tixOption(font) $pri
    option add *TixComboBox*Entry.font		$tixOption(font) $pri
    option add *TixFileSelectBox*Label.font    	$tixOption(font) $pri

}

X7ROOT File Manager

Editing: WmDefault.fsc

Upload File

Create Folder