作者:乔山办公网日期:
返回目录:office365
GetValue()后 , 返回值t (COleVariant变量)中,COLORREF clr = t.intVal(就是这里)。7a64e4b893e5b19e334
参考一下我的代码。
str.Format(_T("通道%d显示的颜色,可以由用户选择输入。"),ch);
CMFCPropertyGridColorProperty* pProp6 = new CMFCPropertyGridColorProperty(_T("颜色显示"), (_variant_t)m_lclDaqParam.m_clrCh[ch], NULL, str);
pProp6->EnableOtherButton(_T("其他..."));
pProp6->EnableAutomaticButton(_T("默认"), ::GetSysColor(COLOR_3DFACE));
pProp6->SetData(CHS_CHANNEL+600+ch);
//-----------------------------------------------------------------------------------------------------
int catorgries = (int) pProp->GetData();
COleVariant t = pProp->GetValue();
.....
else if ( (600<=catorgries) && ( 700> catorgries) )
{
ch = catorgries-CHS_CHANNEL-600;
COLORREF clr = t.intVal;
BYTE R = GetRValue(clr);
BYTE G = GetGValue(clr);
BYTE B = GetBValue(clr);
m_lclDaqParam.m_clrCh[ch] = RGB(R,G,B);
}
1)相比全文字的伸缩下拉菜单,横铺式的菜单更直观、快捷
2)适应大屏幕显示器,彻底展开的横铺式菜单图标和按钮更大
3)Ribbon菜单也是动态菜单,鼠标选中文字、表格、图片、视频等,菜单功能会相应变化。
提供邮箱,我有EXCEL加载宏,实现EXCEL的怀旧菜单。
终极办法,下载office 2010稿纸加载项,才几十KB,重新安装下