uxiugai3.cpp

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

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

#include "UXiuGai3.h"

#include "UGGGLXT.h"
//--------------------------------------------------------------------- 
#pragma resource "*.dfm"
TfmXiuGai3 *fmXiuGai3;
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 TfmXiuGai3::TfmXiuGai3(TComponent* AOwner)
	: TForm(AOwner)
{
}
//---------------------------------------------------------------------

void __fastcall TfmXiuGai3::Button1Click(TObject *Sender)
{
  String cmdSQL;

  cmdSQL="update 公共设施建设 set 设施名称='"+edMC1->Text+"',设施金额="
  +edJE1->Text+",承建商='"+edCJS->Text+"',交付日期='"+atRQ1->DateTime
  +"',设施管理人员='"+edGLR->Text+"',电话='"+edDH1->Text+"',负责人='"+edFZR->Text+"' where 设施编号="+edBH1->Text;
  extern void UpdataSQL(String cmdSQL,TQuery*que);
  UpdataSQL(cmdSQL,fmGGGL->queUpdata);
  MessageBox(0,"修改成功","提示",MB_OK|MB_TASKMODAL);
  Close();
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai3::Button2Click(TObject *Sender)
{
 Close();
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai3::edMC1Exit(TObject *Sender)
{
  edMC1->Text=CutSpace(edMC1->Text.c_str());        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai3::edMC1KeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
if(Key==13) ActiveControl=edJE1;        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai3::edJE1KeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
  if(Key==13) ActiveControl=atRQ1;        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai3::edJE1Exit(TObject *Sender)
{
  edJE1->Text=CutSpace(edJE1->Text.c_str());
  EditTry(edJE1);
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai3::atRQ1KeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
 if(Key==13)  ActiveControl=edCJS;        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai3::edCJSKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
  if(Key==13) ActiveControl=edDH1;        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai3::edCJSExit(TObject *Sender)
{
  edCJS->Text=CutSpace(edCJS->Text.c_str());        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai3::edDH1Exit(TObject *Sender)
{
 edCJS->Text=CutSpace(edCJS->Text.c_str());        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai3::edDH1KeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
   if(Key==13) ActiveControl=edFZR;        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai3::edFZRExit(TObject *Sender)
{
  edFZR->Text=CutSpace(edFZR->Text.c_str());        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai3::edFZRKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
    if(Key==13) ActiveControl=edGLR;        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai3::edGLRExit(TObject *Sender)
{
  edGLR->Text=CutSpace(edGLR->Text.c_str());        
}
//---------------------------------------------------------------------------

void __fastcall TfmXiuGai3::edGLRKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
 if(Key==13)   ActiveControl=Button1;
}
//---------------------------------------------------------------------------