SelectCd_snastr.Cpp

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

#include <vcl.h>

#pragma hdrstop

#include "SelectCD_SNASTR.h"

#include "AcsessToEl.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TSelect_cd_snastr_SSN *Select_cd_snastr_SSN;

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

__fastcall TSelect_cd_snastr_SSN::TSelect_cd_snastr_SSN(TComponent* Owner)

: TForm(Owner)

{

}

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

void __fastcall TSelect_cd_snastr_SSN::Button1Click(TObject *Sender)

{

Select_cd_snastr_SSN->Close();

}

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

SelectKd.Cpp

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

#include <vcl.h>

#pragma hdrstop

#include "SelectKD.h"

#include "AcsessToEl.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TSelectKD_SSN *SelectKD_SSN;

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

__fastcall TSelectKD_SSN::TSelectKD_SSN(TComponent* Owner)

: TForm(Owner)

{

}

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

void __fastcall TSelectKD_SSN::Button1Click(TObject *Sender)

{

SelectKD_SSN->Close();

}

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

SelectKs.Cpp

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

#include <vcl.h>

#pragma hdrstop

#include "SelectKS.h"

#include "AcsessToEl.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TSelectKS_SSN *SelectKS_SSN;

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

__fastcall TSelectKS_SSN::TSelectKS_SSN(TComponent* Owner)

: TForm(Owner)

{

}

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

void __fastcall TSelectKS_SSN::Button1Click(TObject *Sender)

{

SelectKS_SSN->Close();

}

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

SelectPd.Cpp

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

#include <vcl.h>

#pragma hdrstop

#include "SelectPD.h"

#include "AcsessToEl.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TSelectPD_SSN *SelectPD_SSN;

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

__fastcall TSelectPD_SSN::TSelectPD_SSN(TComponent* Owner)

: TForm(Owner)

{

}

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

void __fastcall TSelectPD_SSN::Button1Click(TObject *Sender)

{

SelectPD_SSN->Close();

}

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

SelectPs.Cpp

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

#include <vcl.h>

#pragma hdrstop

#include "SelectPS.h"

#include "AcsessToEl.h"

#include "PS.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TSelectPS_SSN *SelectPS_SSN;

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

__fastcall TSelectPS_SSN::TSelectPS_SSN(TComponent* Owner)

: TForm(Owner)

{

}

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

void __fastcall TSelectPS_SSN::Button1Click(TObject *Sender)

{

SelectPS_SSN->Close();

}

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