reprotzich.~cpp

来自「全面剖析财务管理的内容」· ~CPP 代码 · 共 24 行

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

#include <vcl.h>
#pragma hdrstop

#include "reprotzich.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TfmReportZiCh *fmReportZiCh;
//---------------------------------------------------------------------------
__fastcall TfmReportZiCh::TfmReportZiCh(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void TfmReportZiCh::SetKJQJ(int kjqj)
{
    Table1->Active = true;
    Table1->Filter = "会计期间 = " + IntToStr(kjqj);
    Table1->Filtered = true;
}