00001
00002
00003
00004
00005 #include <windows.h>
00006 #include "tcl.h"
00007
00008 #if defined(TCL_MAJOR_VERSION) && defined(TCL_MAJOR_VERSION)
00009 #if TCL_MAJOR_VERSION == 8
00010 #if TCL_MINOR_VERSION == 4
00011 #pragma comment(lib,"../../bin/tcl84.lib")
00012 #pragma comment(lib,"../../bin/tk84.lib")
00013 #else
00014 #if TCL_MINOR_VERSION == 5
00015 #pragma comment(lib,"../../bin/tcl85.lib")
00016 #pragma comment(lib,"../../bin/tk85.lib")
00017 #else
00018 #pragma message ("TCL/TK 8.4 or more required.")
00019 #endif
00020 #endif
00021 #else
00022 #pragma message ("TCL/TK 8.4 or more required.")
00023 #endif
00024 #endif
00025
00026 int WINAPI DllMain (HINSTANCE hInstance , DWORD reason, PVOID pvReserved)
00027 {
00028 switch (reason)
00029 {
00030 case DLL_PROCESS_ATTACH:
00031 break;
00032 case DLL_PROCESS_DETACH:
00033 break;
00034 case DLL_THREAD_ATTACH:
00035 break;
00036 case DLL_THREAD_DETACH:
00037 break;
00038 }
00039 return 1;
00040 }
00041