kemu.~cpp

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

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

#include <vcl.h>
#pragma hdrstop

#include "kemu.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "Parent"
#pragma resource "*.dfm"
TfmKeMu *fmKeMu;
//---------------------------------------------------------------------------
__fastcall TfmKeMu::TfmKeMu(TComponent* Owner)
    : TfmParent(Owner)
{
    this->szCondition1 = "科目代码";
    this->szCondition2 = "科目名称";
    this->szCondition3 = "科目类别";
    // 设置查询条件的显示
    this->SetSeekEditStatus();
    lblCount->Caption = "记录数: " + IntToStr(Table1->RecordCount) ;
}
//---------------------------------------------------------------------------