C++范例Kit3911NdWord文档下载推荐.docx

C++范例Kit3911NdWord文档下载推荐.docx

《C++范例Kit3911NdWord文档下载推荐.docx》由会员分享，可在线阅读，更多相关《C++范例Kit3911NdWord文档下载推荐.docx（18页珍藏版）》请在冰点文库上搜索。

CVcTick（constCVcTick&

dispatchSrc）:

COleDispatchDriver（dispatchSrc）{}

Attributes

Operations

floatGetLength（）;

voidSetLength（floatnewValue）;

longGetStyle（）;

voidSetStyle（longnNewValue）;

};

{{AFXMsi_INSERTMsi_LOCATION}}

MicrosoftVisualC++willinsertadditionaldeclarationsimmediatelybeforethepreviousline.

#endif!

PartTwo

ListDHDJ.cpp:

implementationoftheCListDHDJclass.

#include"

stdafx.h"

a1.h"

ListDHDJ.h"

myfunction.h"

#ifdefMsi_DEBUG

#undefTHISMsi_FILE

staticcharTHISMsi_FILE[]=Msi_FILEMsi_;

#definenewDEBUGMsi_NEW

#endif

ConstructionDestruction

CListDHDJ:

:

CListDHDJ（）

mMsi_pstrlistKc=newCStringList[4];

for（inti=0;

i<

100;

i++）

mMsi_iTheItemState[i]=0;

mMsi_iKc1Selected[i]=-1;

mMsi_iKc2Selected[i]=-1;

}

this->

InitValuesFromDB（）;

~CListDHDJ（）

delete[]mMsi_pstrlistKc;

voidCListDHDJ:

OnNewEditChange（constint&

item,constint&

subMsi_item）

TRACE（"

voidCListXSDJ:

OnNewEditChange（）\n"

）;

if（this->

mMsi_bSetValue）return;

ASSERT（this->

mMsi_poplist!

=NULL）;

CStringstr;

mMsi_edit.GetWindowText（str）;

CStringstrMsi_sl=this->

GetItemText（item,4）;

switch（subMsi_item）

case0:

str.MakeUpper（）;

if（!

mMsi_poplist->

IsWindowVisible（））

ShowListPop（）;

mMsi_iTheItemState[item]=NOCK;

intsl=0;

sl=atoi（strMsi_sl）;

if（sl&

&

str!

=this->

mMsi_sSetFocus&

mMsi_iKc1Selected[item]>

=0&

mMsi_iKc2Selected[item]>

=0）

CancelTheItem（item）;

RefreshListCtrlView（0,str）;

mMsi_iKc1Selected[item]=-1;

mMsi_iKc2Selected[item]=-1;

break;

case1:

CStringid=this->

GetItemText（item,0）;

mMsi_iTheItemState[item]=NOID;

RefreshListCtrlView（1,str,id,0）;

case2:

CStringckMsi_name2=this->

GetItemText（item,3）;

mMsi_iTheItemState[item]=NONAME;

RefreshListCtrlView（0,id,2,ckMsi_name2,2,str）;

case3:

CStringckMsi_name1=this->

GetItemText（item,2）;

RefreshListCtrlView（0,id,2,ckMsi_name1,2,str）;

case4:

CStringckMsi_name=this->

CStringa;

POSITIONpos=this->

mMsi_pstrlistKc[3].FindIndex（this->

mMsi_iKc1Selected[item]）;

a.Format（"

%d"

mMsi_lKc1Number-atoi（str）+this->

mMsi_edit.mMsi_dSetFocusValue）;

mMsi_pstrlistKc[3].SetAt（pos,a）;

pos=this->

mMsi_iKc2Selected[item]）;

mMsi_lKc2Number+atoi（str）-this->

RefreshListCtrlView（0,id,2,"

"

OnEditSetFocus（constint&

item,constint&

subitem）

mMsi_edit.mMsi_dSetFocusValue=0;

mMsi_sSetFocus=str;

mMsi_edit.GetWindowRect（&

mMsi_rectWindow）;

switch（subitem）

GetItemText（item,1）;

ShowWindow（SWMsi_HIDE）;

SetShowPosition（this->

mMsi_rectWindow,&

mMsi_edit）;

CheckKc（item））&

（IsSelected（item）!

=-1）

mMsi_edit.kcMsi_number=atoi（）;

mMsi_lKc1Number=atoi（mMsi_pstrlistKc[3].GetAt（mMsi_pstrlistKc[3].FindIndex（this->

mMsi_iKc1Selected[item]）））;

mMsi_lKc2Number=atoi（mMsi_pstrlistKc[3].GetAt（mMsi_pstrlistKc[3].FindIndex（this->

mMsi_iKc2Selected[item]）））;

if（ckMsi_name1==ckMsi_name2）gotowrongcase;

if（str!

="

）

mMsi_edit.mMsi_dSetFocusValue=atoi（str）;

else

mMsi_iEditedIndex=-1;

mMsi_edit.ShowWindow（SWMsi_HIDE）;

SetNextItemFocus（）;

MessageBox（"

请确定有此库存信息！

!

"

注意"

return;

wrongcase:

调出库不能等于调入库！

错误"

mMsi_iEditedIndex=1;

boolCListDHDJ:

OnEditReturn（constint&

IsWindowVisible（）&

GetSelectedMark（）>

SetValueUnChange（mMsi_poplist->

GetListCtrlSel（subitem））;

SetItemText（mMsi_nItem,0,this->

GetListCtrlSel（0））;

SetItemText（mMsi_nItem,1,this->

GetListCtrlSel

（1））;

mMsi_iTheItemState[item]=NOWRONG;

SetValueUnChange（"

GetListCtrlSel

（2））;

SetItemText（item,subitem,this->

returnCBaseList:

OnEditReturn（item,subitem）;

OnEditKillFocus（constint&

OnEditKillFocus（）\n"

SetValueUnChange（str）;

CBaseList:

OnEditKillFocus（item,subitem）;

InitValuesFromDB（）

LRunSqlmMsi_runsql;

CStringsql;

Msi_variantMsi_tvalue;

mMsi_pstrlistKc[0].AddTail（"

药品编号"

mMsi_pstrlistKc[1].AddTail（"

药品名称"

mMsi_pstrlistKc[2].AddTail（"

仓库名称"

mMsi_pstrlistKc[3].AddTail（"

库存数量"

mMsi_strlistNo.AddTail（"

sql.Format（"

selecttabkc.ypMsi_id,tabkc.ckMsi_name,tabkc.kcMsi_number,\

tabypinfo.ypMsi_namefromtabkc,tabypinfo\

wheretabkc.ypMsi_id=tabypinfo.ypMsi_id"

mMsi_runsql.CheckSQLResult（sql）;

while（!

mMsi_runsql.mMsi_recordset->

adoEOF）

value=mMsi_runsql.mMsi_recordset->

GetCollect（"

ypMsi_id"

if（value.vt!

=VTMsi_NULL）

mMsi_pstrlistKc[0].AddTail（（char）（Msi_bstrMsi_t）value）;

ypMsi_name"

mMsi_pstrlistKc[1].AddTail（（char）（Msi_bstrMsi_t）value）;

ckMsi_name"

mMsi_pstrlistKc[2].AddTail（（char）（Msi_bstrMsi_t）value）;

kcMsi_number"

mMsi_pstrlistKc[3].AddTail（（char）（Msi_bstrMsi_t）value）;

mMsi_strlistNo.AddTail（（char）（Msi_bstrMsi_t）value）;

MoveNext（）;

returntrue;

Create（DWORDdwStyle,constRECT&

rect,CWndpParentWnd,UINTnID）

boolb=CBaseList:

Create（dwStyle,rect,pParentWnd,nID）;

SelectStringList（4