Tcl & Tk 검색 결과

해당 글 246건

콤보박스 위젯의 팝업 리스트 자동으로 펼치기

콤보박스 위젯의 팝업 리스트를 자동으로 펼치는 방법입니다.ttk::comboboxset cb [ttk::combobox .cb -values [list 1 2 3]]pack $cbproc expand {} { ttk::combobox::Post .cb}pack [button .b -text "expand" -command expand]BWidget::ComboBoxpackage require BWidgetset cb [ComboBox .cb2 -values [list 1 2 3]]pack $cbproc expand {} { ArrowButton::invoke .cb2.a}pack [button .b -text "expand" -command expand]
Tcl & Tk/팁 (Tip) 2025. 3. 24. 10:27

도킹 위젯 구현

출처: http://wiki.tcl.tk/21846 아래의 코드는 도킹을 구현한 예제입니다. 이 코드를 개선하면 괜찮은 위젯이 나올 것 같네요. 일단 아이디어만 참조하시라고 올립니다.# DockingFramework# published under BSD licensepackage require Tkpackage require Ttknamespace eval DockingFramework {# tbs(tab_path)=panedwindow# tbs(panedwindow_path)=parent_panedwindow# tbs(path,path)=tab_pathvariable tbs variable tbcnt 0# find notebook, corresponding to pathproc find_tbn {pat..
Tcl & Tk/팁 (Tip) 2025. 3. 24. 10:25

tdom을 이용한 html 파싱

아래와 같이 tdom 패키지를 이용하여 html 을 파싱 할 수 있습니다.package require tdomset html { }set doc [ dom parse -html $html ]set node [ $doc getElementById m]puts [$node asList]결과div {id m} {}혹은 set node [ $doc getElementById m] 대신에 아래와 같이 해도 됩니다.puts [[$doc selectNodes "//*\[@id\]"] asList]tdom 을 응용하면 html로 파싱할수 있다는것만 알아두셔도 좋을것 같습니다.
Tcl & Tk/팁 (Tip) 2025. 3. 24. 10:22

Tcl 스크립트가 어디에서 실행이 되었는지 체크하는 코드

Twapi를 사용하므로 윈도우즈 전용 코드가 되겠습니다. proc launchtype {} { package require twapi set pid [twapi::get_current_process_id] while {[set pid [twapi::get_process_parent $pid]]} { switch -nocase [twapi::get_process_name $pid] { explorer.exe { return clicked } #[file tail $::env(COMSPEC)] - command.com - cmd.exe { return shelled } services.exe { return service } System { return ..
Tcl & Tk/팁 (Tip) 2025. 3. 20. 10:04

TCP 포트 스캔 구현

TCP의 포트를 스캔하는 확장 패키지를 구현하여 보았습니다. 윈도즈는 GetTcpTable API를 이용하여 MinGW로 테스트하였고, Linux는 /proc/net/tcp 파일을 검색해 보면 알 수 있기에 순수 Tcl로 작성하였습니다.Windows 코드/* portscan.c how to cpmpile % gcc -I$(TCL)/include -DUSE_TCL_STUBS -c portscan.c % gcc -shared -o portscan.dll portscan.o -L$(TCL)/lib -ltcl85 -ltclstub85 -lws2_32 -liphlpapi*/#include #include #ifdef __MINGW32__#include #include #include #endif#include #..
Tcl & Tk/팁 (Tip) 2025. 3. 20. 09:57

백터 폰트 출력 예제

아래는 캔버스 위젯에 백터 폰트를 출력하는 코드입니다. 간단한 캐드 프로그램을 만들때 요긴하게 쓰일겁니다.# A set of routines for drawing a vector font on a canvas. These# display characters/strings at a specified canvas coordinate.namespace eval VectorFont { variable fontarray # Define a 5x7 vector font indexed by the character." { {1 6 1 4} {3 6 3 4} } ' { {2 6 2 4} } , { {1 0 2 1 2 2} } . { {2 0 2 1} } / {..
Tcl & Tk/팁 (Tip) 2025. 3. 19. 10:44