Korea Tcl/Tk Community

홈페이지 : http://www.satisoft.com/tcltk/icons/

ICONS는 크로스 플랫폼 아이콘/이미지 지원을 제공하기 위한 패키지이지만, Tcl/Tk 프로그래머를 위한 독립형 패키지로도 사용할 수 있습니다. 아이콘 이미지의 소스는 라이브러리 또는 GIF/PNG 이미지 파일이 포함된 폴더일 수 있습니다. 라이브러리 또는 이미지 파일 폴더의 내용을 표시하는 유틸리티(viewIcons)가 패키지에 포함되어 있습니다. 현재 5가지 아이콘 테마가 포함된 라이브러리를 사용할 수 있습니다. 각 아이콘 테마는 각각 16x16 및 22x22 아이콘이 포함된 두 개의 라이브러리 파일로 구성됩니다.

Example

# Request the ICONS package and import the "icons" command.
package require icons 2.0
namespace import icons::icons

# Use the "icons" command to create two icons "actreload16" and "navhome16".
# As no icon library file has been specified it is assumed that the required
# file is called "tkIcons" in the directory given by the "info library" command.
icons create {actreload16 navhome16}

# Create two buttons with the previously created icons.
# NOTE: When the icon images are created the names are prefixed with "::icon::".
button .b1 -relief flat -image ::icon::actreload16
button .b2 -relief flat -image ::icon::navhome16

# Pack the buttons into the window. The "-padx" options are simply to create a 
# gap between the buttons.
pack .b1 -padx 2 -side left
pack .b2 -padx 2 -side left