Added base64 images for toolbar buttons
This commit is contained in:
parent
55d37e33e2
commit
bb3add93fa
14
lib/gui.tcl
14
lib/gui.tcl
|
@ -23,9 +23,16 @@ wm overrideredirect . 0
|
|||
wm positionfrom . user
|
||||
set frm_tool [frame .frm_tool]
|
||||
|
||||
ttk::button $frm_tool.btn_add -text + -command Add
|
||||
ttk::button $frm_tool.btn_del -text - -command Del
|
||||
ttk::button $frm_tool.btn_quit -text Выход -command Quit
|
||||
ttk::button $frm_tool.btn_add -command Add -image add_grey_32
|
||||
ttk::button $frm_tool.btn_del -command Del -image del_grey_32
|
||||
ttk::button $frm_tool.btn_quit -command Quit -image quit_grey_32
|
||||
|
||||
ttk::style theme use clam
|
||||
|
||||
# button $frm_tool.btn_add -text + -command Add -image add_color_32 -relief flat
|
||||
# button $frm_tool.btn_del -text - -command Del -image del_color_32 -relief flat
|
||||
# button $frm_tool.btn_quit -text Выход -command Quit -image quit_color_32 -relief flat
|
||||
#
|
||||
|
||||
pack $frm_tool.btn_add $frm_tool.btn_del $frm_tool.btn_quit -side top -padx 5 -pady 5
|
||||
|
||||
|
@ -88,3 +95,4 @@ pack $frm_tree $frm_work -side left -expand true -fill both
|
|||
# grid columnconfigure .t .t.txt -weight 1
|
||||
|
||||
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user