Скачать: CL | DM;

Программное удаление пользователя   Найти похожие ветки 

← →
me2   (2003-05-14 14:20) [0]

Есть грид в котором отображаются пользователи из некой таблицы tblUsers (даные беру из системной таблицы). Мне нужно удалить пользователя. Делаю так
if MessageBox(Application.Handle, "

---

← →
Соловьев ©   (2003-05-14 14:39) [1]

пример из хелпа:
procedure TForm1.Button2Click(Sender: TObject);
begin
with IBSecurityService1 do
begin
ServerName := "Poulet";
LoginPrompt := False;
Params.Add("user_name=sysdba");
Params.Add("password=masterkey");
Active := True;
try
UserName := Edit1.Text;
DeleteUser;
finally
Edit1.Clear;

Active := False;
end;
end;
end;

---

← →
me2   (2003-05-14 14:51) [2]

Да я этот пример и использую, но пользователь не удаляется.

---

← →
Соловьев ©   (2003-05-14 14:58) [3]

у меня работает.

> UserName := DM.dsUsers.DataSet["USER_NAME"];

точно там есть то что ты удаляешь?
ошибку выдает или что?

---

← →
me2   (2003-05-14 15:07) [4]

Немного разобрался - там был просто какойто пользователь, который не хотел удаляться(даже при помощи UserManager IBExperta). Пришлось напрямую из БД. Вопрос теперь в следующем - как видно из кода, который я привел, я сохраняю трансакцию и даже потом еще перреоткрываю tblUsers, но после удаления пользователь еще отображается в гриде и пропадает только после перезапуска приложения. Что с этим делать?

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c