unit2.cpp

一个小的冰酒公司的销售系统。可以进行数据插入

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

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
#include "Unit2.h"
#include "Unit3.h"
#include "Unit4.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TStaff *Staff;
//---------------------------------------------------------------------------
__fastcall TStaff::TStaff(TComponent* Owner)
        : TForm(Owner)
{
  
}
//---------------------------------------------------------------------------
















void __fastcall TStaff::FormCreate(TObject *Sender)
{
  this->DBEdit1->Text="1";
  this->DBEdit2->Text="Anna";
  this->DBEdit3->Text="128 West Toseeshurst";
  this->DBEdit4->Text="772-2848";
  this->DBEdit5->Text="[e-mail]";
  this->DBEdit6->Text="19277";
  
  this->DBEdit8->Text="1";
  this->DBEdit7->Text="1";
  this->DBEdit9->Text="1";
  this->DBEdit10->Text="100";
  this->DBEdit11->Text="10";
  this->DBEdit12->Text="2008/5/1";

  this->KeyPreview=true;
}
//---------------------------------------------------------------------------

void __fastcall TStaff::FormKeyPress(TObject *Sender, char &Key)
{
    if(Key==13)
  {
    if(this->DBEdit1->Focused())
    {
       this->DBEdit2->SetFocus();
       return;
    }
    if(this->DBEdit2->Focused())
    {
       this->DBEdit3->SetFocus();
       return;
    }
    if(this->DBEdit3->Focused())
    {
       this->DBEdit4->SetFocus();
       return;
    }
    if(this->DBEdit4->Focused())
    {
       this->DBEdit5->SetFocus();
       return;
    }
    if(this->DBEdit5->Focused())
    {
       this->DBEdit6->SetFocus();
       return;
    }
    if(this->DBEdit6->Focused())
    {
       this->DBEdit1->SetFocus();
       return;
    }

    if(this->DBEdit8->Focused())
    {
       this->DBEdit7->SetFocus();
       return;
    }
    if(this->DBEdit7->Focused())
    {
       this->DBEdit9->SetFocus();
       return;
    }
    if(this->DBEdit9->Focused())
    {
       this->DBEdit10->SetFocus();
       return;
    }
    if(this->DBEdit10->Focused())
    {
       this->DBEdit11->SetFocus();
       return;
    }
    if(this->DBEdit11->Focused())
    {
       this->DBEdit12->SetFocus();
       return;
    }
    if(this->DBEdit12->Focused())
    {
       this->DBEdit8->SetFocus();
       return;
    }
  }
}
//---------------------------------------------------------------------------

void __fastcall TStaff::BitBtn1Click(TObject *Sender)
{

  this->QuickRep1->Preview();        
}
//---------------------------------------------------------------------------


void __fastcall TStaff::BitBtn2Click(TObject *Sender)
{

   this->QuickRep1->Print();        
}
//---------------------------------------------------------------------------

void __fastcall TStaff::BitBtn4Click(TObject *Sender)
{
  Table1->Close();
  Table1->IndexFieldNames="CNo";
  Table1->Open() ;
  Table1->SetKey();
  Table1->FieldByName("CNo")->AsString=Edit1->Text;
  Table1->GotoKey();
}
//---------------------------------------------------------------------------

void __fastcall TStaff::BitBtn3Click(TObject *Sender)
{
  Close();
}
//---------------------------------------------------------------------------

void __fastcall TStaff::BitBtn6Click(TObject *Sender)
{
  Close();        
}
//---------------------------------------------------------------------------

void __fastcall TStaff::BitBtn5Click(TObject *Sender)
{
  Close();        
}
//---------------------------------------------------------------------------