wm iconbitmap

using Tcl/Tk 8.4.6.0 on a Windows2000 system. On Windows many applications store their icon inside the executable file. So typing:

 wm iconbitmap . test.exe

will return an error. But if you type:

 wm iconbitmap . [wm iconbitmap .]

 wm iconbitmap . test.exe

or

 wm iconbitmap . [wm iconbitmap .]

 wm iconbitmap . -default test.exe

 set location [file join [getDirectoryOfInstalledExecutableForInstanceReadingTheRegistry] "test.exe"]
 wm iconbitmap . [wm iconbitmap .]
 wm iconbitmap . -default "$location"