博客刚开,思绪比较乱,一时想不起来写什么!就把最近搞的关于如何将ppc应用打包的心得写出来,共享给各位朋友!其实,我想有很多高手都知道怎么建立一个完整的打包程序,只是由于各种原因没人写一篇完整的文章,故小弟在研究几天之后做到功能基本完善。使我辈朋友少走弯路, !我说的功能基本完善是指:
1)在ppc今日屏幕中, 有你的程序快捷方式(今日插件);
2)能够建立中文快捷方式;
哈哈,其实就这么多!再多,我也讲不出来!其实没啥技术含量, 大家别见笑!ok,让我们开始,你可以按照我说的步骤一步一步建立工程写代码,也可以直接下载Demo源码查看(建议前一种)!
第一步:建立应用程序。我们打开VS2005,新建一个SmartDevice的应用程序工程项目,我们暂且叫做:CabSample。然后一直往下,直到建立程序,最后编译生成执行程序。ok, 第一步完成。(图略 )
第二步:建立今日插件。关于怎么写今日插件,我不想多说。网上的代码也比较多,在此我给个链接,它比较详细阐述了今日插件。http://www.codeguru.com/cpp/w-p/ce/pocketpc/article.php/c9269__1/
下面是具体步骤:1)在刚才新建的项目中,新建一个工程。该工程是基于SmartDevice的dll项目,我们把工程名定为:MyToday 。如下图所示:
然后一直向下,一直到工程设置选项,在工程类型中选择 dll , 点击完成即可。如图:
下面我们来完成今日插件代码:
首先,我们向 今日插件 工程中加入一个图标(ID_ICON1),表示你的应用程序。
然后,我们在工程的source文件夹中加入.def文件,名字任取,例如:MyToday.def
并在刚才所加文件中写下如下内容:
EXPORTS
InitializeCustomItem @240
再然后,我们完善插件执行代码。我贴出主要代码,具体见demo。注意,在写代码前一定要加入 <todaycmn.h> 头文件。
最后编译,生成 MyToday.dll
MyToday主要源码:
LRESULT CALLBACK WndProc (HWND hWnd, UINT uimessage, WPARAM wParam, LPARAM lParam)
{
switch (uimessage)
{
case WM_TODAYCUSTOM_QUERYREFRESHCACHE:
{
TODAYLISTITEM *ptli = (TODAYLISTITEM *)wParam;
if (NULL == ptli)
break;
if (0 == ptli->cyp)
{
ptli->cyp = PLUG_HEIGHT;
return TRUE;
}
}
break;
case WM_CREATE:
break;
case WM_LBUTTONUP:
{
// 1 判断是否在 有效区域,2 查询注册表, 得到程序路径, 3 启动程序
RECT rect;
POINT point;
point.x = LOWORD(lParam);
point.y = HIWORD(lParam);
::GetClientRect(hWnd, &rect);
if(PtInRect(&rect, point))
{
HKEY hOpenKey;
long lResult = 0;
DWORD iValueType = 0;
DWORD iLen = 0;
PROCESS_INFORMATION procInfo;
TCHAR szPath[MAX_PATH] = {'\0'};
LPCTSTR keyName = _T("Software\\CabSample"); //此注册表存放你应用程序的执行路径
LPCTSTR csAppPath = _T("AppPath");
lResult = ::RegOpenKeyEx(HKEY_CURRENT_USER, keyName, 0, 0, &hOpenKey);
ASSERT(lResult == ERROR_SUCCESS);
if(lResult != ERROR_SUCCESS)
{
MessageBox(hWnd, _T("读注册表失败"), _T("提示"), MB_OK);
//MessageBox(hWnd, _T("Open Regedit Faild"), _T("提示"), MB_OK);
break;
}
iLen = MAX_PATH * sizeof(TCHAR);
lResult = ::RegQueryValueEx(hOpenKey, csAppPath, 0, &iValueType, (BYTE*)szPath, &iLen);
if(lResult != ERROR_SUCCESS)
{
MessageBox(hWnd, _T("读注册表失败"), _T("提示"), MB_OK);
//MessageBox(hWnd, _T("Read Regedit Faild"), _T("提示"), MB_OK);
break;
}
::RegCloseKey(hOpenKey);
BOOL bSuc = ::CreateProcess(szPath, NULL, NULL, NULL, FALSE, 0, NULL, NULL, NULL, &procInfo);
if(bSuc)
{
::CloseHandle(procInfo.hThread);
::CloseHandle(procInfo.hProcess);
}
else
{
MessageBox(hWnd, _T("启动程序失败"), _T("提示"), MB_OK);
//MessageBox(hWnd, _T("start App Failed"), _T("提示"), MB_OK);
//MessageBox(hWnd, szPath, _T("提示"), MB_OK);
}
}
}
break;
case WM_PAINT:
{
HDC hdc;
PAINTSTRUCT ps;
hdc = BeginPaint(hWnd, &ps);
PaintAll(hWnd, hdc);
EndPaint(hWnd, &ps);
}
break;
case WM_ERASEBKGND:
return TRUE;
case WM_TODAYCUSTOM_RECEIVEDSELECTION:
g_bSelected = TRUE;
return TRUE;
case WM_TODAYCUSTOM_USERNAVIGATION:
break;
case WM_TODAYCUSTOM_ACTION:
break;
}
return DefWindowProc (hWnd, uimessage, wParam, lParam) ;
}
第三步:建立安装dll。现在,我们进入第三步。
首先,和第二步类似,我们为项目新增一个名为setupdll的dll工程。在此工程中同样也要加一个.def文件,并且在其中加入如下内容:
EXPORTS
Install_Init
Install_Exit
Uninstall_Init
Uninstall_Exit
然后, 我们完善setupdll的执行代码。我贴出主要代码,具体见demo。注意,在写代码前一定要加入"ce_setup.h" 和<shellapi.h>头文件,其中"ce_setup.h"在demo里面包含。
最后编译,生成 Setupdll.dll
Setupdll主要源码:
codeINSTALL_EXIT Install_Exit(HWND hwndparent,
LPCTSTR pszinstalldir,
WORD cfaileddirs,
WORD cfailedfiles,
WORD cfailedregkeys,
WORD cfailedregvals,
WORD cfailedshortcuts)
{
HKEY hOpenKey = NULL;
long lResult = 0;
DWORD dwOpenStyle = 0;
DWORD iValueType = 0;
DWORD iLen = 0;
DWORD iTemp = 0;
TCHAR szPath[MAX_PATH] = {'\0'};
TCHAR szLinkPath[MAX_PATH] = {0};
TCHAR szAppPath[MAX_PATH] = {0};
LPCTSTR keyName = _T("Software\\CabSample");
LPCTSTR csAppPath = _T("AppPath");
LPCTSTR csTodaykey = _T("Software\\Microsoft\\Today\\Items\\\"打包示例\"");
LPCTSTR csPlugName = _T("MyToday.dll"); // 你的插件名
LPCTSTR csAppName = _T("CabSample.exe"); // 你的程序名
if(cfaileddirs || cfailedfiles || cfailedregkeys
|| cfailedregvals || cfailedshortcuts)
goto Failed;
//获取主程序安装路径
_tcscpy(szPath, pszinstalldir);
_tcscat(szPath, _T("\\"));
_tcscat(szPath, csAppName);
//设置主程序快捷方式的执行路径
_tcscpy(szAppPath, _T("\""));
_tcscat(szAppPath, szPath);
_tcscat(szAppPath, _T("\""));
// 将主程序安装路径写入注册表
lResult = ::RegCreateKeyEx(HKEY_CURRENT_USER, keyName, 0, _T(""), REG_OPTION_NON_VOLATILE,
0,NULL,&hOpenKey, &dwOpenStyle);
if(lResult != ERROR_SUCCESS)
goto Success;
::RegSetValueEx(hOpenKey, csAppPath, 0, REG_SZ, (BYTE*)&szPath, sizeof(TCHAR) * _tcslen(szPath));
::RegCloseKey(hOpenKey);
memset(szPath, 0x00, sizeof(TCHAR) * MAX_PATH);
_tcscpy(szPath, pszinstalldir);
_tcscat(szPath, _T("\\"));
_tcscat(szPath, csPlugName);
::CopyFile(szPath, _T("\\Windows\\MyToday.dll"), FALSE);
// 安装 “今日插件”
hOpenKey = NULL;
lResult = ::RegCreateKeyEx(HKEY_LOCAL_MACHINE, csTodaykey, 0, _T(""), REG_OPTION_NON_VOLATILE,
0, NULL, &hOpenKey, &dwOpenStyle);
if(lResult != ERROR_SUCCESS)
goto Success; //如果读写注册表失败, 放弃安装 “今日插件”
// 注册插件
iTemp = 0;
::RegSetValueEx(hOpenKey, _T("Flags"), 0, REG_DWORD, (BYTE*)&iTemp, sizeof(iTemp));
::RegSetValueEx(hOpenKey, _T("Options"), 0, REG_DWORD, (BYTE*)&iTemp, sizeof(iTemp));
iTemp = 1;
::RegSetValueEx(hOpenKey, _T("Enabled"), 0, REG_DWORD, (BYTE*)&iTemp, sizeof(iTemp));
::RegSetValueEx(hOpenKey, _T("Order"), 0, REG_DWORD, (BYTE*)&iTemp, sizeof(iTemp));
::RegSetValueEx(hOpenKey, _T("Selectability"), 0, REG_DWORD, (BYTE*)&iTemp, sizeof(iTemp));
iTemp = 4;
::RegSetValueEx(hOpenKey, _T("Type"), 0, REG_DWORD, (BYTE*)&iTemp, sizeof(iTemp));
::RegSetValueEx(hOpenKey, _T("DLL"), 0, REG_SZ, (BYTE*)_T("\\Windows\\MyToday.dll"), sizeof(TCHAR) * _tcslen(szPath));
// 发送系统消息
::SendMessage(HWND_BROADCAST, WM_WININICHANGE, (WPARAM)0xF2, 0);
::RegCloseKey(hOpenKey);
//创建快捷方式
if(SHGetSpecialFolderPath(NULL, szLinkPath, CSIDL_PROGRAMS,FALSE))
{
_tcscat(szLinkPath, _T("\\"));
_tcscat(szLinkPath, _T("打包示例.lnk"));
if(SHCreateShortcut(szLinkPath, szAppPath) == FALSE)
{
MessageBox(NULL, _T("安装快捷方式失败"), _T("提示"), MB_OK);
}
}
else
MessageBox(NULL, _T("获取系统文件路径失败"), _T("提示"), MB_OK);
//return value
Success:
return codeINSTALL_EXIT_DONE;
Failed:
return codeINSTALL_EXIT_UNINSTALL;
}
第四步:制作完整打包程序。在项目中新增一个工程,名为CabSampleCab。具体参照下图:
点击ok, 下面咱们进入cab打包阶段。( 我只写步骤,更详细信息,请参考微软msdn)
首先:在“视图”菜单上单击“属性窗口”,或打开“属性”窗口。
在属性网格的“ProductName”字段中,将值更改为“CabSample”。
然后:在“本地文件系统”浏览器下,选择“应用程序文件夹”,右击选中 “新怎”,继续点击 “项目主输出”菜单,在弹出对话框的工程下拉框中,选中 “CabSample”, 重复上面步骤,依次把前面三个工程主输出都加进来。如下图:
再然后:在 方案浏览器中, 选择cab项目工程,查看属性栏。点击属性栏中的 “CE Setup Dll”属性,在弹出下拉框中选择浏览,然后在弹出对话框中点击进入“应用程序
文件夹”选项,选者 安装 dll 的主输出, 点击 ok 如图所示:
再再然后,想cab项目中加入一个注册表项,保存 你的应用程序执行路径。该注册表字符串初始为空,在setupdll中填写正确的路径。
最后,我们就不要为程序创建快捷方式拉,因为我们在setupdll中,已经创建。那为什么不让cab自动创建呢?
1、自动创建的快捷方式,由于某种原因不能创建中文快捷方式;
2、自动创建的快捷方式,有时候卸载程序的时候, 它没被删除;
3、前面我们自己已经创建快捷方式,就不必再麻烦cab拉!!:-)
第五步:编译整个安装方案,生成cab包,下在到ppc上安装, 运行界面如下:
ok, 大功告成!!不懂的,下在demo回去研究!!什么??我的打包过程不完整??你还要能够在pc上通过ActiveSync自动安装, 我晕, 今晚累死,这个大家自己上msdn看吧。第一次写帖子,有不成熟的地方还请各位朋友海涵!!
由于demo太大,上传不上去,所以想要demo的,把Email留下来! 或者去
http://www.winbile.net/BBS/1015441/ShowPost.aspx 下载