employedit.cpp

停车场用

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

#include <vcl.h>
#pragma hdrstop

#include "EmployEdit.h"
#include "DataModle.h"
#include "CardRegister.h"
#include "Global.h"
#include "ShowPicture.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TWEmyloyEdit *WEmyloyEdit;
//---------------------------------------------------------------------------
__fastcall TWEmyloyEdit::TWEmyloyEdit(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TWEmyloyEdit::SButton_CloseClick(TObject *Sender)
{
    Close();    
}
//---------------------------------------------------------------------------
void __fastcall TWEmyloyEdit::SpeedButton1Click(TObject *Sender)
{
    // 车辆图片登记.
    if (OpenPictureDialog->Execute())
    {
        if (FileExists(OpenPictureDialog->FileName))
        {
            ImageBus->Picture->LoadFromFile(OpenPictureDialog->FileName);
            DBEdit7->Text = OpenPictureDialog->FileName;
            BusPictureName = OpenPictureDialog->FileName;
        }
    }
}
//---------------------------------------------------------------------------

void __fastcall TWEmyloyEdit::SButton_SaveClick(TObject *Sender)
{
    PDataModule->ADOQuery_CardReg->Open();
    //日期转换成字符串赋值给登记和终止时间
    if (!bReultModi)
    {
        DBEdit_Start->Text = DateTimePicker_Start->Date.DateString();
        DBEdit_End->Text = DateTimePicker_End->Date.DateString();
    }
    if (PDataModule->DataSource_CardReg->DataSet->RecordCount>0)
    {
        PDataModule->DataSource_CardReg->DataSet->Edit();
        PDataModule->DataSource_CardReg->DataSet->Post();
    }

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

void __fastcall TWEmyloyEdit::FormShow(TObject *Sender)
{
    if (Trim(DBEdit7->Text)==""||DBEdit7->Text==NULL)
    {
        ;
    }
    else
    {
        ImageBus->Picture->LoadFromFile(Trim(DBEdit7->Text));
    }

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

void __fastcall TWEmyloyEdit::SButton_AddClick(TObject *Sender)
{
    bReultModi = false;
    DBEdit_Start->Visible = false ;
    DBEdit_End->Visible = false;
    DateTimePicker_Start->Visible = true;
    DateTimePicker_End->Visible = true;
    PDataModule->DataSource_CardReg->DataSet->Edit();
    PDataModule->DataSource_CardReg->DataSet->Append();
    ImageBus->Picture->LoadFromFile("");
}
//---------------------------------------------------------------------------

void __fastcall TWEmyloyEdit::ImageBusDblClick(TObject *Sender)
{
    //打开车辆图显示窗口:
    BusPictureName = Trim(DBEdit7->Text);
    if (BusPictureName=="")
    {
        ;
    }
    else
    {
        WShowPicture = new TWShowPicture(this);
        if (WShowPicture->Showing == false)
            WShowPicture->ShowModal();
        delete WShowPicture;
    }
}
//---------------------------------------------------------------------------