ITS_OP/VmsCamViewer - aces/MAIN/FrmCameraInfoF.cpp

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

#include <vcl.h>
#include "AppGlobalF.h"
#pragma hdrstop

#include "FrmCameraInfoF.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxContainer"
#pragma link "cxControls"
#pragma link "cxEdit"
#pragma link "cxGraphics"
#pragma link "cxLabel"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinsCore"
#pragma resource "*.dfm"
TFrmCameraInfo *FrmCameraInfo = NULL;
//---------------------------------------------------------------------------
__fastcall TFrmCameraInfo::TFrmCameraInfo(TComponent* Owner)
    : TForm(Owner)
{
    if (g_AppCfg.sLang != "kr")
    {
        Caption = "Information";
        Font->Name = "Tahoma";
        cxLabel1->Caption = "Controller No: ";
        cxLabel2->Caption = "Controller Name: ";
        cxLabel3->Caption = "Stream Address: ";
        cxLabel4->Caption = "Stream Address(Full): ";
    }
}
//---------------------------------------------------------------------------
void __fastcall TFrmCameraInfo::FormClose(TObject *Sender, TCloseAction &Action)
{
    FrmCameraInfo = NULL;
}
//---------------------------------------------------------------------------