ADOConnection1->ConnectionString

#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ADODB.hpp>
#include <DB.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:    // IDE-managed Components
    TButton *Button1;
    TADOConnection *ADOConnection1;
    TADOQuery *ADOQuery1;
 
 
    void __fastcall Button1Click(TObject *Sender);
private:    // User declarations
public:     // User declarations
    __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;

pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 TDataSource *DataSource1;
    //TADOQuery *ADOQuery1;
     TADOConnection *ADOConnection2;
     TADOConnection *ADOConnection1;
void __fastcall TForm1::Button1Click(TObject *Sender)
{
AnsiString Way = "ServerComp";
ADOConnection1->ConnectionString = "Provider=SQLOLEDB.1;Password=123456;Persist Security Info=True;User ID=test_mailer;Initial Catalog=Serv;Data Source=" + Way;
  ADOConnection1->Connected = true;

ADOConnection1->ConnectionString = "Provider=SQLOLEDB.1;Password=123456;Persist Security Info=True;User ID=test_mailer;Initial Catalog=Serv;Data Source=" ;