KVIP考勤系統

最近用VC重寫了一個幾年前用PowerBuiler寫的軟件。軟件功能並不多，主要是我模仿PB做了幾個通用基類,還有這幾年收集的一些東東,以下是程序中使用到的主要的幾個類:

1、ADOxxxx是別人寫的一個數據庫類，具體怎麼用去問作者吧。

2、CPreGraphic是實現繪制的類，DrawText()等

3、CPrePrint是控制打印機的類，CPrintDialog等

4、CDataWin是實現功能的主要類，它把VC在IDE介面中設計的窗口轉換成報表

5、CDlgDoc //簡單頁

6、CListDoc //列表頁

使用方法：

1、在工程中加入ADO、DataWin目錄中的所有文件

2、在App中加入對COM的支持

App::InitInstance()加入CoInitialize(NULL);

App::ExitInstance()加入CoUninitialize();

3、生成一個CDataWin類的實例

CDataWin m_dlg;
m_dlg.Create(IDD_DIALOG1, this);　//創建
m_dlg.Init();
// m_dlg.SetDoubleRam(TRUE);　//雙緩存，提高顯示速度
// m_dlg.SetPrintView(FALSE);　//是否模擬顯示
CRect rect;　//定位
GetClientRect(&rect);
rect.DeflateRect(10, 50, 10, 50);
m_dlg.MoveWindow(rect,FALSE);
m_dlg.ShowWindow(SW_SHOW);

4、執行打印

m_dlg.OnPrint("Title1");　//打印項目名稱，什麼都沒關系

技術細節

在IDE窗口中加入三條PROGRESS，把窗口分成4個區域(頁頭、表體、表尾、頁尾)。在生成窗口後CDataWin會取出窗口中所有控件的位置、類型等，然後隱藏控件。CDataWin根據這些信息去連結數據庫，取出數據並顯示或打印出來。

a)標題是SQL命令

b)=Name 等號+數據庫表項的名稱

c)其它為一般顯示。

主要初始化函數Init()包括以下功能：

InitGraphic();　//創建繪圖類
ResetAll();　//復位所有變量
InitBase();　//修改窗口風格、初始化紙張
fnEnumControl();　//枚舉所有子窗口
if(!Init4Control())
　　return FALSE;　//初始化窗口結構
InitConnect();　//連結數據庫
Open(m_strDefSQL);　//打開表格
UpdateRecord();　//載入數據庫數據
ShowWindow(SW_SHOW);　//顯示

窗口中的控件被轉換成統一的CDataCell結構，就象Grid中的項目。

刷新窗口時會執行

OnPaint()
OnPageStart()
OnCellStart(CDataCell *p)　//N次
OnCellEnd(CDataCell *p)　　//你可以繼承這些函數，從而改變顯示內容
OnPageEnd()　　　　　　　　//格式、或禁止它。

補充: 程序存在大量坐標轉換的運算，其實不用去理解，只要在OnCellStart()中對CDataCell進行修改就可以達到不同的效果。簡單擴展類CDlg1就是讓ID顯示紅色。

簡單頁的處理

例：

CDlgDoc m_Doc;
void CDlgWkInput::OnInitialUpdate()
{
....//初始化
m_Doc.Init(&m_Page1);　//m_Page1 是圖2
m_Doc.SetConnection(m_pConnection);
....
}
void CDlgWkInput::OnSave()
{
..
m_Doc.Save();
..
}
void CDlgWkInput::OnRetrieve()
{
..
CString sqlText(_T("Select * From kv_staff_mr"));
m_Doc.Retrieve(sqlText);
..
}

效果圖

四、結束語

希望本文中的數據庫,打印等處理對大家有參考價值,詳細請見源程序.

本文配套源碼