uxiugai1.cpp

社区管理系统的公共管理模块

//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "UXiuGai1.h"

#include "UGGGLXT.h"
//--------------------------------------------------------------------- 
#pragma resource "*.dfm"
TfmXiuGai1 *fmXiuGai1;

void OpenSQL(String cmdSQL,TQuery*que)
{
 que->Close();
 que->SQL->Clear();
 que->SQL->Add(cmdSQL);
 que->Open();
}
void UpdataSQL(String cmdSQL,TQuery*que)
{
  que->Close();
  que->SQL->Clear();
  que->SQL->Add(cmdSQL);
  que->ExecSQL();
}

int RedIsExists(String cmdSQL,TQuery *Que)
{
  int Res;
  OpenSQL(cmdSQL,Que);
  Res=Que->RecordCount;
  Que->Close();
  return Res;
}

String CutSpace(char *Str)
{
  String s;
  s="";
  while(*Str)
  {
    if((*Str!=' ')&&(*Str!='　')) s=s+(*Str);
    Str++;
  }
  return s;
}

int EditTry(TEdit *edTemp)
{
  try
  {
    StrToInt(edTemp->Text);
    return 0;
   }
  catch(...)
  {
    MessageBox(0,"该项只能输入数字","输入出错",MB_OK|MB_TASKMODAL|MB_ICONERROR);
    edTemp->SelectAll();
    fmGGGL->ActiveControl=edTemp;
    return 1;
  }
}

int EditTryFloat(TEdit *edTemp)
{
  try
  {
    StrToFloat(edTemp->Text);
    return 0;
   }
  catch(...)
  {
    MessageBox(0,"该项只能输入数字","输入出错",MB_OK|MB_TASKMODAL|MB_ICONERROR);
    edTemp->SelectAll();
    fmGGGL->ActiveControl=edTemp;
    return 1;
  }
}
//---------------------------------------------------------------------
__fastcall TfmXiuGai1::TfmXiuGai1(TComponent* AOwner)
	: TForm(AOwner)
{

}
//---------------------------------------------------------------------

void __fastcall TfmXiuGai1::Button9Click(TObject *Sender)
{
  Close();         
}
//---------------------------------------------------------------------------



void __fastcall TfmXiuGai1::Button8Click(TObject *Sender)
{
  String cmdSQL;

  cmdSQL="update 公共设施使用 set 使用时间="+edSYSJ->Text+",使用人数="
  +edSYRS->Text+",使用金额="+edSYJE->Text+",使用状态='"+cmbSYZT->Text
  +"',使用人员名称='"+edSYRY->Text+"' where 设施编号="+edBH2->Text;
  
  UpdataSQL(cmdSQL,fmGGGL->queUpdata);
  MessageBox(0,"修改成功","提示",MB_OK|MB_TASKMODAL);
  Close();
}
//---------------------------------------------------------------------------


void __fastcall TfmXiuGai1::edSYJEKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
  if(Key==13) ActiveControl=cmbSYZT;        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai1::edSYJEExit(TObject *Sender)
{
   edSYJE->Text=CutSpace(edSYJE->Text.c_str());

    EditTryFloat(edSYJE);
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai1::edSYSJExit(TObject *Sender)
{
   edSYJE->Text=CutSpace(edSYJE->Text.c_str());
   EditTryFloat(edSYJE);
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai1::edSYSJKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
  if(Key==13) ActiveControl=edSYRS;        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai1::edSYRSKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
  if(Key==13) ActiveControl=edSYJE;        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai1::edSYRSExit(TObject *Sender)
{
  edSYRS->Text=CutSpace(edSYRS->Text.c_str());
  EditTry(edSYRS);
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai1::cmbSYZTKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
if(Key==13) ActiveControl=edSYRY;        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai1::edSYRYKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
  if(Key==13 )  ActiveControl=Button8;        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai1::edSYRYExit(TObject *Sender)
{
  edSYRY->Text=CutSpace(edSYRY->Text.c_str());
}
//---------------------------------------------------------------------------