companyinfo.cpp

来自「一套BCB６开发的电话管理系统」· C++ 代码 · 共 30 行

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

#include <vcl.h>
#pragma hdrstop

#include "CompanyInfo.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TDlgCompanyInfo *DlgCompanyInfo;
//---------------------------------------------------------------------------
__fastcall TDlgCompanyInfo::TDlgCompanyInfo(  bool bNew, String& Code, String& Name,
        TIniFile *pMessageIniFile, TComponent* Owner)
        : bNew( bNew), Code( Code), Name( Name), pMsgIniFile( pMessageIniFile), TForm(Owner)
{
    EtName->Text = Name;
    EtCode->Text = Code;

    if( bNew) {
        EtCode->ReadOnly = false;
    }
}
//---------------------------------------------------------------------------

void __fastcall TDlgCompanyInfo::OKBtnClick(TObject *Sender)
{
    if( EtCode->Text.data() == 0) {
        String Default;
        String Title = pMsgIniFile->ReadString( "TelWarning", "Msg1", Default);
        String Message = pMsgIniFile->ReadString( "TelWarning", "Msg3", Default);//そ