<script language="javascript">
<!--
var bsYear;
var bsDate;
var bsWeek;
var arrLen=8; //數組長度
var sValue=0; //當年的秒數
var dayiy=0; //當年第幾天
var miy=0; //月份的下標
var iyear=0; //年份標記
var dayim=0; //當月第幾天
var spd=86400; //每天的秒數
var year1999="30;29;29;30;29;29;30;29;30;30;30;29"; //354
var year2000="30;30;29;29;30;29;29;30;29;30;30;29"; //354
var year2001="30;30;29;30;29;30;29;29;30;29;30;29;30"; //384
var year2002="30;30;29;30;29;30;29;29;30;29;30;29"; //354
var year2003="30;30;29;30;30;29;30;29;29;30;29;30"; //355
var year2004="29;30;29;30;30;29;30;29;30;29;30;29;30"; //384
var year2005="29;30;29;30;29;30;30;29;30;29;30;29"; //354
var year2006="30;29;30;29;30;30;29;29;30;30;29;29;30";
var month1999="正月;二月;三月;四月;五月;六月;七月;八月;九月;十月;十一月;十二月"
var month2001="正月;二月;三月;四月;閏四月;五月;六月;七月;八月;九月;十月;十一月;十二月"
var month2004="正月;二月;閏二月;三月;四月;五月;六月;七月;八月;九月;十月;十一月;十二月"
var month2006="正月;二月;三月;四月;五月;六月;七月;閏七月;八月;九月;十月;十一月;十二月"
var Dn="初一;初二;初三;初四;初五;初六;初七;初八;初九;初十;十一;十二;十三;十四;十五;十六;十七;十八;十九;二十;廿一;廿二;廿三;廿四;廿五;廿六;廿七;廿八;廿九;三十";
var Ys=new Array(arrLen);
Ys[0]=919094400;Ys[1]=949680000;Ys[2]=980265600;
Ys[3]=1013443200;Ys[4]=1044028800;Ys[5]=1074700800;
Ys[6]=1107878400;Ys[7]=1138464000;
var Yn=new Array(arrLen); //農歷年的名稱
Yn[0]="己卯年";Yn[1]="庚辰年";Yn[2]="辛巳年";
Yn[3]="壬午年";Yn[4]="癸未年";Yn[5]="甲申年";
Yn[6]="乙酉年";Yn[7]="丙戌年";
var D=new Date();
var yy=D.getYear();
var mm=D.getMonth()+1;
var dd=D.getDate();
var ww=D.getDay();
if (ww==0) ww="<font color=RED>星期日";
if (ww==1) ww="星期一";
if (ww==2) ww="星期二";
if (ww==3) ww="星期三";
if (ww==4) ww="星期四";
if (ww==5) ww="星期五";
if (ww==6) ww="<font color=RED>星期六";
ww=ww;
var ss=parseInt(D.getTime() / 1000);
if (yy<100) yy="19"+yy;
for (i=0;i<arrLen;i++)
if (ss>=Ys[i]){
iyear=i;
sValue=ss-Ys[i]; //當年的秒數
}
dayiy=parseInt(sValue/spd)+1; //當年的天數
var dpm=year1999;
if (iyear==1) dpm=year2000;
if (iyear==2) dpm=year2001;
if (iyear==3) dpm=year2002;
if (iyear==4) dpm=year2003;
if (iyear==5) dpm=year2004;
if (iyear==6) dpm=year2005;
if (iyear==7) dpm=year2006;
dpm=dpm.split(";");
var Mn=month1999;
if (iyear==2) Mn=month2001;
if (iyear==5) Mn=month2004;
if (iyear==7) Mn=month2006;
Mn=Mn.split(";");
var Dn="初一;初二;初三;初四;初五;初六;初七;初八;初九;初十;十一;十二;十三;十四;十五;十六;十七;十八;十九;二十;廿一;廿二;廿三;廿四;廿五;廿六;廿七;廿八;廿九;三十";
Dn=Dn.split(";");
dayim=dayiy;
var total=new Array(13);
total[0]=parseInt(dpm[0]);
for (i=1;i<dpm.length-1;i++) total[i]=parseInt(dpm[i])+total[i-1];
for (i=dpm.length-1;i>0;i--)
if (dayim>total[i-1]){
dayim=dayim-total[i-1];
miy=i;
}
bsWeek=ww;
bsDate=yy+"年"+mm+"月";
bsDate2=dd;
bsYear="農歷"+Yn[iyear];
bsYear2=Mn[miy]+Dn[dayim-1];
if (ss>=Ys[7]||ss<Ys[0]) bsYear=Yn[7];
/* 修改下面的表格屬性*/
function CAL(){
document.write("<table border='1' cellspacing='3' width='120' bordercolor='#009B00' bgcolor='#FFFFFF' height='110' cellpadding='2'");
document.write("<tr><td align='center'><b><font color=#008040>"+bsDate+"</font><br><font face='Arial' size='6' color=#FF8040>"+bsDate2+"</font><br><font color=#008040><span style='FONT-SIZE: 10.5pt'>");
document.write(bsWeek+"</span><br>"+"<br></b><font color=#9B4E00>");
document.write(bsYear+"<br>"+bsYear2+"</td></tr></table>");
}
//-->
</script><script language="javascript">CAL();</script>
void company::payroll(employee *pe) { //對指針轉換失敗,dynamic_cast返回NULL if(programmer *pm=dynamic_cast pm->bonus(); } } void company::payroll(employee &re) { try{ //對引用轉換失敗的話,則會以拋出異常來報告錯誤 programmer &rm=dynamic_cast pm->bonus(); } catch(std::bad_cast){ } } |
employee* pe=new manager; typeid(*pe)==typeid(manager) //true |
class type_info { private: type_info(const type_info&); type_info& operator=( const type_info& ); public: virtual ~type_info(); int operator==( const type_info& ) const; int operator!=( const type_info& ) const; const char* name() const; }; 實現目標: 實現的方案 方案一:利用多態來取得指針或應用的實際類型信息 這是一個最簡單的方法,也是作者目前所采用的辦法。 實現:
示例:
輸出:
這種實現方法也就是在基類中提供一個多態的方法,這個方法返回一個類型信息。這樣我們能夠知道一個指針所指向對象的具體類型,可以滿足一些簡單的要求。 但是很顯然,這樣的方法只實現了typeid的部分功能,還存在很多缺點: 1、 用戶每增加一個類必須覆蓋GetClassName和TypeOfClass兩個方法,如果忘了,會導致程序錯誤。 2、 這里的類名和類標識信息不足以實現dynamic_cast的功能,從這個意義上而言此方案根本不能稱為RTTI。 3、 用戶必須手工維護每個類的類名與標識,這限制了以庫的方式提供給用戶的可能。 4、 用戶必須手工添加GetClassName和TypeOfClass兩個方法,使用并不方便。 其中上面的部分問題我們可以采用C/C++中的宏技巧(Macro Magic)來解決,這個可以在我們的最終解決方案的代碼中看到。下面采用方案二中將予以解決上述問題。 方案二:以一個類型表來存儲類型信息 這種方法考慮使用一個類結構,除了保留原有的整型類ID,類名字符串外,增加了一個指向基類TypeInfo成員的指針。
從這里可以看到,以這種方式實現的RTTI不支持多重繼承。所幸多重繼承在程序設計中并非必須,而且也不推薦。下面的代碼中,我將為DP9900軟件項 目組中類層次結構中的幾個類添加RTTI功能。DP9900項目中,絕大部分的類都以單繼承方式從UObject這個根類直接或間接繼承而來。這樣我們就 可以從UObject開始,加入我們RTTI支持所需要的數據和方法。
考慮從UObject將這個TypeInfo類作為每一個新增類的靜態成員,這樣一個類的所有對象將共享TypeInfo的唯一實例。我們希望能夠在程 序運行之前就為type_id,className做好初始化,并讓pBaseClass指向基類的這個TypeInfo。 每個類的TypeInfo成員約定使用rttiTypeInfo的命名,為了避免命名沖突,我們將其作為private成員。有了基類的支持并不夠,當用戶需要RTTI支持,還需要自己來做一些事情: 1、 派生類需要從UObject繼承。 2、 添加rttiTypeInfo變量。 3、 在類外正確初始化rttiTypeInfo靜態成員。 4、 覆蓋GetTypeID、GetTypeName、GetTypeInfo、GetTypeInfoClass四個成員函數。 如下所示:
有了前三步,這樣我們就可以得到一個不算太復雜的鏈表――這是一棵類型信息構成的"樹",與數據結構中的樹的唯一差別就是其指針方向相反。 這樣,從任何一個UObject的子類,順著pBaseClass往上找,總能遍歷它的所有父類,最終到達UObject。 在這個鏈表的基礎上,要判別某個對象是否屬于某一個類就很簡單。下面給出UObject::IsKindOf()的實現。
有了IsKindOf的支持,dynamic_cast的功能也就可以用一個簡單的safe_cast來實現:
至此,我們已經能夠從功能上完成前面的目標了,不過用戶要使用這個類庫的RTTI功能還很麻煩,要敲入一大堆對他們毫無意義的函數代碼,要在初始化 rttiTypeInfo靜態成員時手工設置類ID與類名。其實這些麻煩完全不必交給我們的用戶,適當采用一些宏技巧(Macro Magic),就可以讓C++的預處理器來替我們寫很多枯燥的代碼。關于宏不是本文的重點,你可以從最終代碼清單看到它們。下面再談談關于類ID的問題。 類ID 為了使不同類型的對象可區分,用一個給每個TypeInfo對象一個類ID來作為比較的依據是必要的。 其 實對于我們這里的需求和實現方法而言,其實類ID并不是必須的。每一個支持RTTI的類都包含了一個靜態TypeInfo對象,這個對象的地址就是在進程 中全局唯一。但考慮到其他一些技術如:動態對象創建、對象序列化等,它們可能會要求RTTI給出一個靜態不變的ID。在本文的實現中,對此作了有益的嘗 試。 首先聲明一個用來產生遞增類ID的全局變量。再聲明如下一個結構,沒有數據成員,只有一個構造函數用于初始化TypeInfo的類ID:
為UObject添加一個private的靜態成員及其初始化:
并且對每一個從UObject派生的子類也進行同樣的添加。這樣您將看到,在C++主函數執行前,啟動代碼將替我們調用每一個類的 initClassInfo成員的構造函數InitTypeInfo::InitTypeInfo(TypeInfo* info),而正是這個函數替我們產生并設置了類ID。InitTypeInfo的構造函數還可以替我們做其他一些有用的初始化工作,比如將所有的 TypeInfo信息登錄到一個表格里,讓我們可以很方便的遍歷它。 但實踐與查閱資料讓我們發現,由于C++中對靜態成員初始化的順序沒有明確的規定,所以這樣的方式產生出來的類ID并非完全靜態,換一個編譯器編譯執行產生的結果可能完全不同。 還有一個可以考慮的方案是采用某種無沖突HASH算法,將類名轉換成為一個唯一整數。使用標準CRC32算法從類型名計算出一個整數作為類ID也許是個不錯的想法[3]。 程序清單
實現結果 本文實現了如下幾個宏來支持RTTI,它們的使用方法都可以在上面的代碼中找到:
性能測試 測試代碼: 這里使用相同次數的DYNAMIC_CAST和dynamic_cast進行對比測試,在VC6.0下編譯運行,使用默認的Release編譯配置選項。為了避免編譯器優化導致的不公平測試結果,我在循環中加入了無意義的計數操作。
運行結果:
這是上述條件下的測試輸出,我們可以看到,本文實現的這個精簡RTTI方案運行DYNAMIC_CAST的時間開銷只有dynamic_cast的1/3。為了得到更全面的數據,還進行了DEBUG編譯配置選項下的測試。 輸出:
這種情況下DYNAMIC_CAST運行速度要比dynamic_cast慢一倍左右。如果在Release編譯配置選項下將UObject:: IsKindOf方法改成如下inline函數,我們將得到更讓人興奮的結果(DYNAMIC_CAST運行時間只有dynamic_cast的 1/5)。
輸出:
結論: 由本文的實踐可以得出結論,自己動手編碼實現RTTI是簡單可行的。這樣的實現可以在編譯器優秀的代碼優化中表現出比dynamic_cast更好的性 能,而且沒有帶來過多的存儲開銷。本文的RTTI以性能為主要設計目標,在實現上一定程度上受到了MFC的影響。適于嵌入式環境。 |
'添加文件頭定義
Public Sub AddFileHead()
Dim objTextSelection As TextSelection
Dim comment As String
objTextSelection = CType(DTE.ActiveDocument.Selection, EnvDTE.TextSelection)
'objTextSelection.LineUp()
objTextSelection.NewLine()
objTextSelection.Text = comment + "http://==================================================================="
objTextSelection.NewLine()
objTextSelection.Text = comment + "/** \file"
objTextSelection.NewLine()
objTextSelection.Text = comment + "* Filename: " + DTE.ActiveDocument.Name
objTextSelection.NewLine()
objTextSelection.Text = comment + "*"
objTextSelection.NewLine()
objTextSelection.Text = comment + "* Desc:"
objTextSelection.NewLine()
objTextSelection.Text = comment + "*"
objTextSelection.NewLine()
objTextSelection.Text = comment + "* His: Ipedo create @ " + Date.Now
objTextSelection.NewLine()
objTextSelection.Text = comment + "*/"
objTextSelection.NewLine()
objTextSelection.Text = comment + "http://==================================================================="
End Sub
'添加文件函數定義
Public Sub AddFunctionHead()
Dim objTextSelection As TextSelection
Dim comment As String
objTextSelection = CType(DTE.ActiveDocument.Selection, EnvDTE.TextSelection)
'objTextSelection.LineUp()
objTextSelection.NewLine()
objTextSelection.Text = comment + "/** \brief"
objTextSelection.NewLine()
objTextSelection.Text = comment + " " + "* 函數功能:"
objTextSelection.NewLine()
objTextSelection.Text = comment + "*"
objTextSelection.NewLine()
objTextSelection.Text = comment + "* 函數說明:"
objTextSelection.NewLine()
objTextSelection.Text = comment + "*"
objTextSelection.NewLine()
objTextSelection.Text = comment + "* \param _f1 第一個浮點參數."
objTextSelection.NewLine()
objTextSelection.Text = comment + "* \param _f2 第二個浮點參數."
objTextSelection.NewLine()
objTextSelection.Text = comment + "* \return bool 返回兩個浮點數是否相等.返回true時表示相等."
objTextSelection.NewLine()
objTextSelection.Text = comment + "*"
objTextSelection.NewLine()
objTextSelection.Text = comment + "* 算法描述:"
objTextSelection.NewLine()
objTextSelection.Text = comment + "* (描述內容)"
objTextSelection.NewLine()
objTextSelection.Text = comment + "*/"
End Sub
Sub 文件注釋()
DTE.ActiveDocument.Selection.Text = "http://==================================================================="
DTE.ActiveDocument.Selection.NewLine()
DTE.ActiveDocument.Selection.Text = "/** \file "
DTE.ActiveDocument.Selection.NewLine()
'DTE.ActiveDocument.Selection.Indent()
DTE.ActiveDocument.Selection.Text = "* Filename : " + DTE.ActiveDocument.Name
DTE.ActiveDocument.Selection.NewLine()
DTE.ActiveDocument.Selection.Text = "* Desc : "
DTE.ActiveDocument.Selection.NewLine()
DTE.ActiveDocument.Selection.Text = "* His : Windy create @" + Date.Now
DTE.ActiveDocument.Selection.NewLine()
DTE.ActiveDocument.Selection.NewLine()
DTE.ActiveDocument.Selection.DeleteLeft()
DTE.ActiveDocument.Selection.Text = "*/"
DTE.ActiveDocument.Selection.NewLine()
DTE.ActiveDocument.Selection.Text = "http://==================================================================="
DTE.ActiveDocument.Selection.StartOfLine(vsStartOfLineOptions.vsStartOfLineOptionsFirstText)
End Sub
---- 1. BMP文件組成
---- BMP文件由文件頭、位圖信息頭、顏色信息和圖形數據四部分組成。
---- 2. BMP文件頭
---- BMP文件頭數據結構含有BMP文件的類型、文件大小和位圖起始位置等信息。
---- 其結構定義如下:
typedef struct tagBITMAPFILEHEADER { WORDbfType; // 位圖文件的類型,必須為BM DWORD bfSize; // 位圖文件的大小,以字節為單位 WORDbfReserved1; // 位圖文件保留字,必須為0 WORDbfReserved2; // 位圖文件保留字,必須為0 DWORD bfOffBits; // 位圖數據的起始位置,以相對于位圖 // 文件頭的偏移量表示,以字節為單位 } BITMAPFILEHEADER;
---- 3. 位圖信息頭
BMP位圖信息頭數據用于說明位圖的尺寸等信息。 typedef struct tagBITMAPINFOHEADER{ DWORD biSize; // 本結構所占用字節數 LONGbiWidth; // 位圖的寬度,以像素為單位 LONGbiHeight; // 位圖的高度,以像素為單位 WORD biPlanes; // 目標設備的級別,必須為1 WORD biBitCount// 每個像素所需的位數,必須是1(雙色), // 4(16色),8(256色)或24(真彩色)之一 DWORD biCompression; // 位圖壓縮類型,必須是 0(不壓縮), // 1(BI_RLE8壓縮類型)或2(BI_RLE4壓縮類型)之一 DWORD biSizeImage; // 位圖的大小,以字節為單位 LONGbiXPelsPerMeter; // 位圖水平分辨率,每米像素數 LONGbiYPelsPerMeter; // 位圖垂直分辨率,每米像素數 DWORD biClrUsed;// 位圖實際使用的顏色表中的顏色數 DWORD biClrImportant;// 位圖顯示過程中重要的顏色數 } BITMAPINFOHEADER;
---- 4. 顏色表
---- 顏色表用于說明位圖中的顏色,它有若干個表項,每一個表項是一個RGBQUAD類型的結構,定義一種顏色。RGBQUAD結構的定義如下:
typedef struct tagRGBQUAD { BYTErgbBlue;// 藍色的亮度(值范圍為0-255) BYTErgbGreen; // 綠色的亮度(值范圍為0-255) BYTErgbRed; // 紅色的亮度(值范圍為0-255) BYTErgbReserved;// 保留,必須為0 } RGBQUAD; 顏色表中RGBQUAD結構數據的個數有biBitCount來確定: 當biBitCount=1,4,8時,分別有2,16,256個表項; 當biBitCount=24時,沒有顏色表項。 位圖信息頭和顏色表組成位圖信息,BITMAPINFO結構定義如下: typedef struct tagBITMAPINFO { BITMAPINFOHEADER bmiHeader; // 位圖信息頭 RGBQUAD bmiColors[1]; // 顏色表 } BITMAPINFO;
---- 5. 位圖數據
---- 位圖數據記錄了位圖的每一個像素值,記錄順序是在掃描行內是從左到右,掃描行之間是從下到上。位圖的一個像素值所占的字節數:
當biBitCount=1時,8個像素占1個字節; 當biBitCount=4時,2個像素占1個字節; 當biBitCount=8時,1個像素占1個字節; 當biBitCount=24時,1個像素占3個字節;
Windows規定一個掃描行所占的字節數必須是 4的倍數(即以long為單位),不足的以0填充,
一個掃描行所占的字節數計算方法: DataSizePerLine= (biWidth* biBitCount+31)/8;
// 一個掃描行所占的字節數 DataSizePerLine= DataSizePerLine/4*4; // 字節數必須是4的倍數
位圖數據的大小(不壓縮情況下): DataSize= DataSizePerLine* biHeight;
摘要: MFC對象的創建 前面幾章介紹了MFC的核心概念和思想,即介紹了MFC對Windows對象的封裝方法和特點;MFC對象的動態創建、序列化;MFC消息映射機制。 現在,考查MFC的應用程序結構體系,即以文檔-視為核心的編程模式。學習本章,應該弄清楚以下問題: MFC中諸多MFC對象的關系:應用程序對象,文檔對象,邊框窗口對象,文檔邊框窗口對象,視對象,文檔模板對象等。 MFC對象的創建... 閱讀全文