Connect To Sql Server using ADO

Delphi/Pascal

<span style="text-decoration: underline;"></span>procedure TForm1.Button1Click(Sender: TObject); begin ADOConnection1.ConnectionString := 'Server=Hostname;DataBase=DatabaseName'; ADOConnection1.Open('UserName', 'Password'); ADOConnection1.Connected := True; end;

1 2 3 4 5 6

<span style="text-decoration: underline;"></span>procedure TForm1.Button1Click(Sender: TObject); begin ADOConnection1.ConnectionString := 'Server=Hostname;DataBase=DatabaseName'; ADOConnection1.Open('UserName', 'Password'); ADOConnection1.Connected := True; end;