Welcome to my Tcl/Tk page.
| Features | CWind v1.4 |
WinTclSend v1.5 |
|---|---|---|
| Keyboard event | ![]() |
![]() |
| Mouse event | ![]() |
![]() |
| Glob-style matching | ![]() |
|
| Internationalization | ![]() |
|
| MDI window | ![]() |
|
| Windows Message | ![]() |
|
| Installer | ![]() |
![]() |
| Free and Open | ![]() |
|
| Requirement | Tcl8.1 or higher | Tcl8.2 or higher |
26-Oct-2003
26-Oct-2003Changes with CWind 1.4 *) Add mouse event. *) Add installer Changes with CWind 1.3.1 *) Fix bug about ::cwind::putcb. *) Fix compile problems with VC5 english version. Changes with CWind 1.3 *) Add ::cwind::sendmessage command. *) Add ::cwind::postmessage command. *) Fix bug about ::cwind::send. *) Change to glob pattern matching. *) Add install.tcl
package require cwind
exec $env(COMSPEC) /c start wordpad.exe &
::cwind::waitwind {*WordPad} 10
::cwind::send {Hello World!} |RET|
after 1000
::cwind::send |CTRL+| a |CTRL-|
after 1000
::cwind::send |CTRL+| c |CTRL-|
after 1000
set clip [::cwind::getcb]
after 1000
::cwind::send |END| |CTRL+| v |CTRL-|
after 1000
::cwind::send |ALT+| h |ALT-| a
after 1000
::cwind::send |ALT+| |SNAP| |ALT-|
exec $env(COMSPEC) /c start mspaint.exe &
::cwind::waitwind {*Paint} 10
::cwind::send |ALT+| e |ALT-| p
exit
|