开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 电子书籍 > VC书籍 > 查看源码
Unit1.cpp
资源名称：C++Builder.rar　[点击查看]
上传用户：lhxd_sz
上传日期：2014-10-02
资源大小：38814k
文件大小：2k
源码类别：

VC书籍

开发平台：

C++ Builder

Unit1.cpp：源码内容
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #pragma hdrstop
  5. #include "Unit1.h"
  6. //---------------------------------------------------------------------------
  7. #pragma package(smart_init)
  8. #pragma resource "*.dfm"
  9. TForm1 *Form1;
  10. //---------------------------------------------------------------------------
  11. __fastcall TForm1::TForm1(TComponent* Owner)
  12.         : TForm(Owner)
  13. {
  14. }
  15. //---------------------------------------------------------------------------
  16. void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
  17. {
  18.   switch(Key)
  19.   {
  20.     case '0': //接受数字键0~9的输入
  21.     case '1':
  22.     case '2':
  23.     case '3':
  24.     case '4':
  25.     case '5':
  26.     case '6':
  27.     case '7':
  28.     case '8':
  29.     case '9':
  30.     case 8: //这是一个BackSpace键，不能禁止，否则不能实现删除功能了
  31.       break;
  32.     case '.': //检查是否已存在小数点
  33.       if(DotInStr(Edit1->Text))
  34.         Key=0;
  35.       break;
  36.     case '+': //检查是否已存在符号
  37.     case '-':
  38.       if(SignInStr(Edit1->Text))
  39.         Key=0;
  40.       break;
  41.     default: //对于其他输入键，置Key=0
  42.       Key=0;
  43.       break;
  44.   }
  45. }
  46. //---------------------------------------------------------------------------
  47. bool __fastcall TForm1::DotInStr(AnsiString ass)
  48. {
  49.   int ii,ll;
  50.   ll=ass.Length();
  51.   for(ii=0;ii<ll;ii++)
  52.   {
  53.     if(ass.c_str()[ii]=='.')
  54.     {
  55.       return True;
  56.     }
  57.   }
  58.   return False;
  59. }
  60. //该函数检查字符串前面是否已存在"+、-"符号
  61. bool __fastcall TForm1::SignInStr(AnsiString ass)
  62. {
  63.   int ii,ll;
  64.   ll=ass.Length();
  65.   for(ii=0;ii<ll;ii++)
  66.   {
  67.     if((ass.c_str()[ii]=='+')||(ass.c_str()[ii]=='-'))
  68.     {
  69.       return True;
  70.     }
  71.   }
  72.   return False;
  73. }