LogIn E-mail
설계이야기
[tk]새 창 열고 닫기 예제
# 39 JMJS    09.4.24 07:50

#!/usr/bin/wish

proc openWin {} {
        destroy .ow
        pack [button .ow -text "close Window" -command "closeWin"] -in .m

        toplevel .w -background red
        wm title .w Red
        pack [button .w.q -text Close -command "closeWin"]
}

proc closeWin {} {
        destroy .w
        destroy .ow
        pack [button .ow -text "open Window" -command "openWin"] -in .m
}

wm title . White
wm iconname . White
pack [frame .m -background blue]
closeWin
pack [button .q -text Exit -command "destroy ."]

게시물: 112 건, 현재: 1 / 1 쪽
번호 제       목 작성자 등록일 방문
115  [make] .PHONY JMJS 24.3.28 32
114  [make] -n -d -r --debug=b JMJS 24.3.28 37
113  magick convert -rotate -append JMJS 23.10.12 66
112  dirname JMJS 23.3.20 125
111  zip a.zip -r ./a JMJS 23.2.1 150
110  ffmpeg AlwaysMovie JMJS 22.12.6 153
109  7za a abc.zip abc -> tar -c -z -f abc.zip abc JMJS 22.11.30 156
108  convert mogrify JMJS 23.2.1 237
107  [sh]array JMJS 19.8.14 290
106  arithmetic in a makefile, shell pwd export JMJS 17.9.8 4342
105  Split and merge large files JMJS 16.3.21 941
104  [Makefile]random JMJS 14.12.5 1329
100  윈도우7 용량부족 winsxs 폴더 최적화 JMJS 14.10.14 2261
99  [sh,csh]while loop JMJS 13.2.6 2302
98  hostname, hostid, /sbin/ifconfig eth0 JMJS 13.1.4 4315
97  [linux]fedora 16 gome-shell extension JMJS 12.3.12 1993
96  [linux]fedora 16 grub boot order change JMJS 12.3.10 2234
95  [linux]fedora Input Method,ibus,hangul JMJS 12.3.8 1924
94  [linux]audio,mp3,mplayer,gstreamer,vlc JMJS 12.3.7 2642
93  [sh].wrapper example JMJS 11.6.15 2245
92  [make]for loop JMJS 11.9.8 1919
91  [make]conditional expression JMJS 11.5.12 1809
90  [make]shell 실행 JMJS 11.3.9 1943
89  [wish]jplot JMJS 10.5.12 1590
88  yum JMJS 09.8.12 1624
87  [CYGWIN]X setup하기 JMJS 10.8.6 2961
86  [Make]Makefile Brief JMJS 10.8.6 1653
85  ldd /user/bin/xterm JMJS 09.4.24 1334
84  [HTML]어도비 SVG 뷰어와 HTML JMJS 09.4.24 1912
83  [DOS]DOS command JMJS 09.7.20 1591
82  [DOS]DOS command brief JMJS 07.2.21 2073
81  웹페이지 소스보기 JMJS 09.4.24 1588
80  [html]자동으로 글자색 바뀜 JMJS 07.1.10 1529
79  [html]복사, 드래그 금지 JMJS 07.1.10 2027
78  [csh]cshell에서 function 못쓴다네요 JMJS 11.3.17 1584
77  리눅스에서 i386,i586,i686, x86의 차이점 JMJS 06.10.16 1845
76  [CSH]$status JMJS 06.8.21 1300
75  [sh]substr, read, until,IFS,for,dirname JMJS 14.12.19 1504
74  [sh]rgbview.sh . hello.sh JMJS 10.11.30 1423
73  automount - /etc/fstab JMJS 06.2.23 1439
72  lmutil.csh JMJS 05.11.8 1765
71  화일이름에 못오는 문자 JMJS 05.9.8 1551
70  /usr/ucb /usr/ccs JMJS 05.9.5 1422
69  Solaris Version JMJS 05.9.5 1645
68  /usr/ccs/bin/nm -x debpli.so JMJS 05.8.31 1912
67  tar, gzip, zcat, uncompress, mn(.a 파일보기) JMJS 13.1.6 1765
66  find . -name -print -exec perl JMJS 09.4.17 1728
65  pkgadd -d packagefile JMJS 05.5.9 1468
64  prstat JMJS 08.10.2 1717
63  vi 명령어, vim명령어 gvim JMJS 24.4.28 4877
62  multiple directory 에서 grep ? JMJS 04.5.31 1885
61  [csh].cshrc_axis JMJS 04.5.14 1748
60  [csh].cshrc_modelsim JMJS 04.5.14 1869
59  [csh].cshrc_cadence JMJS 04.5.14 1906
58  [csh].cshrc_novas JMJS 04.5.14 1789
57  [csh].cshrc_verisity JMJS 04.5.14 2165
56  lmgrd JMJS 09.6.22 2492
55  [csh]which case JMJS 04.5.14 1754
54  [bash]example 2 JMJS 04.5.12 1988
53  [bash]example 1 JMJS 04.5.12 1858
52  fedora 12에서 touchpad disable JMJS 11.1.17 1935
51  [Perl]한국어 인코딩 JMJS 04.1.16 2749
50  [Perl]HTML에서 기호 표시를 위한 문자치환 JMJS 04.1.5 10933
49  [csh]make awk JMJS 03.6.6 2136
48  [csh]wordsplit JMJS 03.6.6 1776
47  [csh]vi2 JMJS 03.6.6 1618
46  [csh]cat.csh JMJS 03.6.6 1677
45  [csh]chgword.csh JMJS 03.6.6 1624
44  [bash]password JMJS 11.3.9 1525
43  [Tcl]bi2int JMJS 02.11.29 1529
42  [PC]ask 검색창이 자꾸 뜬다면 JMJS 09.4.24 2045
41  [csh]backup_copyc.csh; foreach; continue JMJS 09.4.24 1705
40  uname, uname -s -r, uname -p, uname -a JMJS 09.4.24 1905
39  [tk]새 창 열고 닫기 예제 JMJS 09.4.24 11512
38  [sh]if [[ "$abc" == "abc" && "$bbc" == "bbc" ]]; ... JMJS 11.3.17 1644
37  [expect]expect_scp.exp JMJS 11.3.9 1695
36  ssh -x -l soc lion scp -r ... JMJS 11.3.9 1496
35  TclTk 배열 JMJS 09.7.20 1582
34  ./configure make make install JMJS 11.1.13 1511
33  [csh]diff JMJS 10.7.14 1570
32  tr abc 123 < file1 > file2 JMJS 11.4.11 1510
31  Installing RPMforge JMJS 10.2.8 1603
30  [태그]글자색이 사라짐 JMJS 09.4.24 1655
29  [태그]자동으로 글자색이 변함 JMJS 09.4.24 1641
28  글자태그 모음 JMJS 09.4.24 1800
27  색상명과 RGB값 표 JMJS 09.4.24 1805
26  RGB 색상표 JMJS 09.4.24 1961
25  한글특수문자표 JMJS 09.4.24 1873
24  bc -l JMJS 01.5.22 1561
23  file *,  od -xc *, cat * JMJS 01.3.28 1877
22  Linux Memo JMJS 09.7.20 1713
21  xterm -fn 10x20 & JMJS 12.3.7 1552
20  W/S Tip JMJS 09.4.29 1634
19  [awk]example JMJS 10.10.30 1870
18  [csh].cshrc JMJS 11.6.21 2324
17  stop & background job JMJS 00.11.14 1517
16  W/S shout down JMJS 00.11.14 1501
15  [sed]example JMJS 16.9.5 1887
14  [DOS]Memo JMJS 00.10.29 1623
13  [csh]리스트를 만들어 foreach로 처리할때 JMJS 00.10.7 5352
12  [Tcl]Tool Command Language JMJS 09.7.24 3018
11  [csh]vi.csh JMJS 00.6.27 1629
10  [csh]Check Process JMJS 00.6.27 1566
9  [csh]Get Character and get char without 'return' JMJS 10.2.8 1696
8  [csh]foreach SED JMJS 00.6.27 2003
7  [Window]오류보고 안 뜨게하는 방법 JMJS 09.9.23 1579
6  [csh]echo.csh JMJS 00.6.27 1758
5  set DDD = `date '+%y%m'` JMJS 00.6.27 1484
4  [SH]Advanced Bash-Scripting Guide JMJS 09.4.24 1434
3  [csh]Beep : echo ^G;sleep 1 JMJS 00.6.27 1773
2  [csh]if ($abc == $bbc) then _ else _ endif JMJS 00.6.27 1968
1  [csh]ARGV JMJS 00.6.27 2041
[1]