نحوه افزدون کابر - تعریف کاربر برای لاگین در بانک اس کیو ال سرورها در زمان اجرا

کد:

---

procedure TForm1.Button1Click(Sender: TObject); begin ADOConnection1.Connected := True; ADOCommand1.CommandText := 'Exec SP_AddLogin ' + QuotedStr('UserName') + ',' + QuotedStr('Password') + ',' + QuotedStr('Database Name') + ',' + QuotedStr('English') + ';'; ADOCommand1.Execute; end;

---