goodsproperty.cpp

速达开源ERP系统

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

#include <vcl.h>
#pragma hdrstop

#include "GoodsProperty.h"
#include "gvar.h"
#include "commfunction.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "SDComboBox"
#pragma resource "*.dfm"
TfrmGoodsProperty *frmGoodsProperty;
//---------------------------------------------------------------------------
__fastcall TfrmGoodsProperty::TfrmGoodsProperty(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TfrmGoodsProperty::SetGoodsPpt1(AnsiString value)
{
  scProperty1->LocateKey(value);  
}

//---------------------------------------------------------------------------
void __fastcall TfrmGoodsProperty::SetGoodsPpt2(AnsiString value)
{
  scProperty2->LocateKey(value);
}

//---------------------------------------------------------------------------
AnsiString __fastcall TfrmGoodsProperty::GetGoodsPpt1()
{
  if(g_sdGoodsPpt==1 || g_sdGoodsPpt==2)
    return scProperty1->ItemData[1];
  else
    return "";
}
//---------------------------------------------------------------------------
AnsiString __fastcall TfrmGoodsProperty::GetGoodsPpt2()
{
  if(g_sdGoodsPpt==2)
    return scProperty1->ItemData[1];
  else
    return "";
}

//---------------------------------------------------------------------------
__fastcall TfrmGoodsProperty::TfrmGoodsProperty(TComponent* Owner,AnsiString GoodsCode)
  : TForm(Owner)
{
  AnsiString SqlStr;
  if(g_sdGoodsPpt==1)
  {
    SqlStr="select GoodsPpt1ID,GoodsPpt1Name from sdGoodsPpt1 where GoodsPpt1Goods='"+GoodsCode+"'";
    FillComboBox(scProperty1,SqlStr,"GoodsPpt1Name","GoodsPpt1ID");
    scProperty1->Enabled=true;
    lbProperty1->Caption=g_sdProperty1Name;
  }
  else if(g_sdGoodsPpt==2)
  {
    SqlStr="select GoodsPpt1ID,GoodsPpt1Name from sdGoodsPpt1 where GoodsPpt1Goods='"+GoodsCode+"'";
    FillComboBox(scProperty1,SqlStr,"GoodsPpt1Name","GoodsPpt1ID");
    scProperty1->Enabled=true;
    SqlStr="select GoodsPpt2ID,GoodsPpt2Name from sdGoodsPpt2 where GoodsPpt2Goods='"+GoodsCode+"'";
    FillComboBox(scProperty2,SqlStr,"GoodsPpt1Name","GoodsPpt1ID");
    scProperty2->Enabled=true;
    lbProperty1->Caption=g_sdProperty1Name+":";
    lbProperty2->Caption=g_sdProperty2Name+":";
  }
  else
  {
    scProperty1->ClearAll();
    scProperty2->ClearAll();
    scProperty1->Enabled=false;
    scProperty2->Enabled=false;
    lbProperty1->Caption="状态1:";
    lbProperty2->Caption="状态2:";
  }
}
//---------------------------------------------------------------------------
void __fastcall TfrmGoodsProperty::bbOKClick(TObject *Sender)
{
  if(g_sdGoodsPpt==1)
  {
    if(scProperty1->ItemIndex==-1)
    {
      this->ModalResult=0;
      throw Exception(g_sdProperty1Name+"不能为空");
    }
  }
  else if(g_sdGoodsPpt==2)
  {
    if(scProperty1->ItemIndex==-1)
    {
      this->ModalResult=0;
      throw Exception(g_sdProperty1Name+"不能为空");
    }
    if(scProperty2->ItemIndex==-1)
    {
      this->ModalResult=0;
      throw Exception(g_sdProperty2Name+"不能为空");
    }
  }
  this->ModalResult=mrOk;  
}
//---------------------------------------------------------------------------