supplyquery.h

科思ERP部分源码及控件

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

#ifndef SupplyQueryH
#define SupplyQueryH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include "RecBaseForm.h"
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "fpanel.h"
#include "SDComboBox.h"
#include "SDEdit.h"
#include "SDGrid.h"
#include "SDTreeView.h"
#include <Buttons.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <Grids.hpp>
#include <ImgList.hpp>
#include "BaseGlobeVars.h"
#include "container.h"
#include "ClientDcom.h"
//---------------------------------------------------------------------------
class TfrmSupplyQuery : public TForm
{
__published:	// IDE-managed Components
        TFloatPanel *FloatPanel1;
        TBitBtn *btnOK;
        TBitBtn *btnCancel;
        TBitBtn *btnQuery;
        TBitBtn *btnClear;
        TPanel *Panel1;
        TSplitter *Splitter1;
        TSDGrid *sgGoods;
        TSDTreeView *tvGoods;
        TPanel *Panel2;
        TLabel *Label5;
        TEdit *edtLocate;
    TBevel *Bevel4;
    TLabel *Label6;
    TLabel *lbQueryCount;
    TLabel *Label8;
    TSpeedButton *sbLocate;
    TBevel *Bevel1;
    TBevel *Bevel3;
    TGroupBox *GroupBox3;
    TLabel *Label1;
    TLabel *Label2;
    TLabel *Label7;
    TSDComboBox *scLoc;
    TSDComboBox *scSale;
    TSDComboBox *scSupply;
    TImageList *ImageList1;
        void __fastcall btnOKClick(TObject *Sender);
        void __fastcall btnClearClick(TObject *Sender);
        void __fastcall btnQueryClick(TObject *Sender);
        void __fastcall tvGoodsChange(TObject *Sender, TTreeNode *Node);
    void __fastcall sbLocateClick(TObject *Sender);
    void __fastcall edtLocateKeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
    void __fastcall btnCancelClick(TObject *Sender);
private:	// User declarations
        TKSSet *l_Supply;
        TComResultSet *RsGoods;
        TComResultSet *RsGoodsQuery;
        HWND l_ClientHandle ;
        AnsiString l_WhereStr;
        AnsiString l_TvSelect;
        int         cur_location;
        void __fastcall ClearCondition();
        void __fastcall FillGridWithData();
        void __fastcall FillTreeWithPmpc();
        AnsiString __fastcall GetQueryStr();
       // bool __fastcall IsSimilar(AnsiString str,AnsiString substr);
public:		// User declarations
        __fastcall TfrmSupplyQuery(TComponent* Owner,HWND chWnd,TKSSet *Goods,AnsiString whereStr);
        __fastcall ~TfrmSupplyQuery();
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmSupplyQuery *frmSupplyQuery;
//---------------------------------------------------------------------------
#endif