string Client::ReadFile(DML_type d_type,string FileName,Send_Type file)
{
	string realData;
	ifstream rfile;
	cout <<"open file is : " << FileName << endl;
	char *ptr = (char *)FileName.c_str();
//	rfile.open("../cfg/t_user_info.txt",ifstream::in);
	rfile.open(ptr,ifstream::in);
	if(!rfile)
	{
		cout << "open error" << endl;
		return NULL;
	}

	rfile.seekg(0,ios::end);
	int length = rfile.tellg();
	rfile.seekg(0,ios::beg);
	char * buffer = new char[length];
	rfile.read(buffer,length);
	rfile.close();
	buffer[length] = '\0';

	
	realData = FormData(d_type,buffer,file);

	delete [] buffer;
	return realData;
}
//---------------------------------------------------------------------------
void __fastcall TCPServEx1::PedeMesAno( void )
{
  TDPPdData1*  DPData;
  try
   {
    DPData = new TDPPdData1( this );
    DPData->Tag = 999;
    DPData->PHEdit1->Tag = 999;
    DPData->PHEdit1->PHDSCampo = CFGERAL_CPSERVEXMESANO;
    DPData->Campo = CFGERAL_CPSERVEXMESANO;
    DPData->Caption = PHDS1->Tabela->NomeOpcao;
    DPData->PHLabel1->PHDSCampo = CFGERAL_CPSERVEXMESANO;

    int CodCampo = DPData->PHDS1->CodCampoTabela( CFGERAL_CPSERVEXMESANO );
    bool SDataLimPeriodo = DPData->PHDS1->Tabela->CamposDef->Items[CodCampo]->DataLimPeriodo;
    DPData->PHDS1->Tabela->CamposDef->Items[CodCampo]->DataLimPeriodo = true;
    DPData->ShowModal();
    DPData->PHDS1->Tabela->CamposDef->Items[CodCampo]->DataLimPeriodo = SDataLimPeriodo;
    PHDS1->AnoNomeArq = RetornaData( FormDataSB( IntToStr( ( int ) DPData->Data ) ), RDANO );
    PHDS1->MesNomeArq = RetornaData( FormDataSB( IntToStr( ( int ) DPData->Data ) ), RDMES );
    TCadPad1::FormShow( this );
    Button1->Font->Name = "MS Sans Serif";
    Button1->Caption = "&Mês/Ano <" + FormData( IntToStr( DPData->Data ) ) + ">";
   }

  __finally
   {
    delete DPData;
   }

  Show();
}