Сообщение от
captain
//Соединение АДО
CREATE(cn);
strConnection:='Provider=SQLOLEDB.1;Persist Security Info=False;User ID=ghghghh;'+
'Password=ffgfgfg;'+
'Initial Catalog=MyDB;'+
'Data Source=SERVER1;Auto Translate=true';
cn.ConnectionString:=strConnection;
cn.Open;