Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2003.06.02;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "Базы";
Текущий архив: 2003.06.02;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.009 c
8-3016
Garry_Dorado
2003-02-17 10:24
2003.06.02
Работа с растровыми изображениями...


8-3019
Suharew
2003-02-16 00:53
2003.06.02
Как быстро выводить рисунок на экран.


1-2861
firefox
2003-05-22 11:55
2003.06.02
TThread - возможно ли по окончании передать результат


1-2928
Hill
2003-05-20 17:52
2003.06.02
TRichEdit и как разобрать текст по оформлению


6-3023
Джек
2003-03-20 13:38
2003.06.02
Конец загрузки нужного фрейма в WebBrowser?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский