c++builder6.0开发的信息管理系统

c++ builder6.0开发的一个小软件，数据库是使用sql server2008r2，可进行客户添加，修改及查询；消费信息的添加查询，以及消费信息的分类统计和打印。数据库分页，右键菜单，TListView的使用.

//---------------------------------------------------------------------------

#include 
#pragma hdrstop

#include “FmAddConRecord.h“
#include “Unit1.h“
//---------------------------------------------------------------------------
#pragma package（smart_init）
#pragma resource “*.dfm“
Tfm_addConRecord *fm_addConRecord;
//---------------------------------------------------------------------------
__fastcall Tfm_addConRecord::Tfm_addConRecord（TComponent* Owner）
        : TForm（Owner）
{
    isAdd=false;
}
//---------------------------------------------------------------------------
void __fastcall Tfm_addConRecord::edit_UIDKeyPress（Tobject *Sender
      char &Key）
{
    AnsiString strUID = edit_UID->Text.Trim（）;
    if（Key==8 || Key==13） return;
    if（Key<‘0‘ || Key>‘9‘ || strUID.Length（）>=10）{
      Key=0;
      return;
    }

}
//---------------------------------------------------------------------------
void __fastcall Tfm_addConRecord::edit_priceKeyPress（Tobject *Sender
      char &Key）
{
    AnsiString strPrice=edit_price->Text.Trim（）;
    if（Key==8 || Key==13） return;
    if（!（（Key>=‘0‘ && Key<=‘9‘） || Key==‘.‘） || strPrice.Length（）>=9）{
      Key=0;
    }else{
      int index=strPrice.Pos（“.“）;
      if（Key==‘.‘ && index>0）{
        Key=0;
        return;
      }
      AnsiString subString=strPrice.SubString（indexstrPrice.Length（）-index）;
      if（subString.Length（）>=3 && index>0）{
        Key=0;
      }
    }

}
//---------------------------------------------------------------------------
void __fastcall Tfm_addConRecord::edit_qtyKeyPress（Tobject *Sender
      char &Key）
{
    AnsiString strQty=edit_qty->Text.Trim（）;
    if（Key==8 || Key==13） return;
    if（!（（Key>=‘0‘ && Key<=‘9‘） || Key==‘.‘） || strQty.Length（）>=9）{
      Key=0;
    }else{
      int index=strQty.Pos（“.“）;
      if（Key==‘.‘ && index>0）{
        Key=0;
        return;
      }
      AnsiString subString=strQty.SubString（indexstrQty.Length（）-index）;
      if（subString.Length（）>=3 && index>0）{
        Key=0;
      }
    }
}
//---------------------------------------------------------------------------
void __fastcall Tfm_addConRecord::edit_priceChange（Tobject *Sender）
{
    AnsiString strPrice=edit_price->Text.Trim（）;
    AnsiString strQty=edit_qty->Text.Trim（）;
    if（strQty==““ || strPrice==““）{
      edit_money->Text=“0“;
      return;
    }

    double money=strPrice.ToDouble（）*strQty.ToDouble（）;
    if（money>9999999999.99）{
      btn_addRecord->Enabled=false;
      label_overrange->Visible=true;
    }else{
      btn_addRecord->Enabled=true;
      label_overrange->Visible=false;
    }
    AnsiString strMoney=FloatToStrF（moneyffFixed132）;
    edit_money->Text=strMoney;

}
//---------------------------------------------------------------------------
void __fastcall Tfm_addConRecord::edit_qtyChange（Tobject *Sender）
{
    AnsiString strPrice=edit_price->Text.Trim（）;
    

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2018-10-16 09:01  20181016_0825\
     文件     3145728  2018-10-16 08:30  20181016_0825\MYDB.mdf
     文件     1048576  2018-10-16 08:30  20181016_0825\MYDB_log.ldf
     目录           0  2018-10-16 08:57  20181016_0825\源码\
     文件        5286  2018-10-11 16:49  20181016_0825\源码\FmAddConRecord.cpp
     文件          51  2018-10-11 16:55  20181016_0825\源码\FmAddConRecord.ddp
     文件        3404  2018-10-11 16:53  20181016_0825\源码\FmAddConRecord.dfm
     文件        1733  2018-10-10 14:23  20181016_0825\源码\FmAddConRecord.h
     文件       30528  2018-10-15 08:20  20181016_0825\源码\FmAddConRecord.obj
     文件        5286  2018-10-11 16:49  20181016_0825\源码\FmAddConRecord.~cpp
     文件          51  2018-10-11 16:55  20181016_0825\源码\FmAddConRecord.~ddp
     文件        3404  2018-10-11 16:53  20181016_0825\源码\FmAddConRecord.~dfm
     文件        1733  2018-10-10 14:23  20181016_0825\源码\FmAddConRecord.~h
     文件         709  2018-10-10 08:19  20181016_0825\源码\FrmAbout.cpp
     文件          51  2018-10-12 08:44  20181016_0825\源码\FrmAbout.ddp
     文件        2374  2018-10-12 08:37  20181016_0825\源码\FrmAbout.dfm
     文件        1002  2018-10-11 16:11  20181016_0825\源码\FrmAbout.h
     文件       17444  2018-10-11 16:18  20181016_0825\源码\FrmAbout.obj
     文件         709  2018-10-10 08:19  20181016_0825\源码\FrmAbout.~cpp
     文件          51  2018-10-12 08:40  20181016_0825\源码\FrmAbout.~ddp
     文件        2374  2018-10-12 08:37  20181016_0825\源码\FrmAbout.~dfm
     文件        1002  2018-10-11 16:11  20181016_0825\源码\FrmAbout.~h
     文件        6109  2018-10-11 15:59  20181016_0825\源码\FrmAddUserInfo.cpp
     文件          51  2018-10-11 15:59  20181016_0825\源码\FrmAddUserInfo.ddp
     文件        5026  2018-10-11 11:35  20181016_0825\源码\FrmAddUserInfo.dfm
     文件        2005  2018-10-10 15:15  20181016_0825\源码\FrmAddUserInfo.h
     文件       29912  2018-10-15 08:20  20181016_0825\源码\FrmAddUserInfo.obj
     文件        6109  2018-10-11 15:59  20181016_0825\源码\FrmAddUserInfo.~cpp
     文件          51  2018-10-11 15:59  20181016_0825\源码\FrmAddUserInfo.~ddp
     文件        5026  2018-10-11 11:35  20181016_0825\源码\FrmAddUserInfo.~dfm
     文件        2005  2018-10-10 15:15  20181016_0825\源码\FrmAddUserInfo.~h
............此处省略82个文件信息