lua_code.zip_Lua嵌入_exe-hreader_lua_lua c_lua c++

// HReader.cpp : main source file for HReader.exe // #include "stdafx.h" //------------------------------------------------------------------------------------- // Library Linkage //------------------------------------------------------------------------------------- //- #if defined (_DEBUG) #pragma comment( lib, "lua.lib" ) // Lua Support #else #pragma comment( lib, "lua.lib" ) // Lua Support #endif //- #include <atlframe.h> #include <atlctrls.h> #include <atldlgs.h> #include "resource.h" #include "aboutdlg.h" #include "MainFrm.h" #include "LimitSingleInstance.h" CAppModule _Module; int Run(LPTSTR /*lpstrCmdLine*/ = NULL, int nCmdShow = SW_SHOWDEFAULT) { CMessageLoop theLoop; _Module.AddMessageLoop(&theLoop); CMainFrame *wndMain = CMainFrame::Instance(); if((*wndMain).CreateEx() == NULL) { ATLTRACE(_T("Main window creation failed!\n")); return 0; } (*wndMain).ShowWindow(nCmdShow); int nRet = theLoop.Run(); _Module.RemoveMessageLoop(); return nRet; } // Reference in http://support.microsoft.com/?id=243953 // The one and only CLimitSingleInstance object. // Change what is passed to constructor. GUIDGEN Tool may be of help. CLimitSingleInstance& GetLimitSingleInstance() { static CLimitSingleInstance singleInstanceObj(TEXT("Global\\{{5A0C0986-398D-4b51-9C6F-6A336AFB0929}}")); return singleInstanceObj; } int WINAPI _tWinMain(HINSTANCE hInstance, HINSTANCE /*hPrevInstance*/, LPTSTR lpstrCmdLine, int nCmdShow) { // Check if have more then one Instance Running. if (GetLimitSingleInstance().IsAnotherInstanceRunning()) { return FALSE; } HRESULT hRes = ::CoInitialize(NULL); // If you are running on NT 4.0 or higher you can use the following call instead to // make the EXE free threaded. This means that calls come in on a random RPC thread. // HRESULT hRes = ::CoInitializeEx(NULL, COINIT_MULTITHREADED); ATLASSERT(SUCCEEDED(hRes)); // this resolves ATL window thunking problem when Microsoft Layer for Unicode (MSLU) is used ::DefWindowProc(NULL, 0, 0, 0L); AtlInitCommonControls(ICC_BAR_CLASSES); // add flags to support other controls hRes = _Module.Init(NULL, hInstance); ATLASSERT(SUCCEEDED(hRes)); AtlAxWinInit(); int nRet = Run(lpstrCmdLine, nCmdShow); _Module.Term(); ::CoUninitialize(); return nRet; }