TADOConnection *conexion;
TADOTable *adoTable;
TDataSource *dataSource;
conexion=new TADOConnection(conexion);
conexion->ConnectionString="Provider=MSDASQL.1;Password=root;Persist Security Info=True;User ID=root;Data Source=GestionADC;Extended Properties='DSN=GestionADC;DESC=MySQL ODBC 3.51 Driver DSN;DATABASE=gestionADC;SERVER=localhost;UID=root;PASSWORD=root;PORT=3306;OPTION=3;STMT=;';Initial Catalog=gestionadc";
conexion->CursorLocation=clUseClient;
conexion->Provider ="MSDASQL.1";
conexion->DefaultDatabase="gestionADC";
conexion->LoginPrompt =false;
conexion->Open();
adoTable=new TADOTable(adoTable);
adoTable->Connection = conexion;
adoTable->TableName ="registroincidenciaslaminacion";
adoTable->Active =true;
dataSource=new TDataSource(dataSource);
dataSource->DataSet=adoTable;