GetModuleFileName(GetModuleHandle(NULL),szModePath,256);
Tcl_FindExecutable(szModePath);
设置可执行路径,给load 等参数使用