VPF::Проблема с TADOConnection.OnInfoMessage - Форум программистов

sg729

Дата 4.5.2013, 14:52 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 31
Регистрация: 17.5.2009

Репутация: нет
Всего: 1

У компоненты TADOConnection есть событие OnInfoMessage, которое, если верить хелпу, должно генерироваться при получении информационного сообщения от хранилища данных. Один из параметров OnInfoMessage - EventStatus может принимать значение esOK - Operation executed without problem. Казалось бы, даже в случае успешного выполнения операции есть возможность перехватить отголосок этого события и обработать его. Однако, пробую делать примерно так (Delphi 7):

Код


procedure TForm1.ADOConnection1InfoMessage(Connection: TADOConnection;
  const Error: Error; var EventStatus: TEventStatus);
var
  msg : String;
begin
  msg:='';
  case EventStatus of
    esOK            :    msg:='OK';            //Operation executed without problem.
    esErrorsOccured :    msg:='ErrorsOccured'; //An error occurred during execution of the operation.
    esCantDeny      :    msg:='CantDeny';      //A pending connection operation cannot be canceled. (Connection events only.).
    esCancel        :    msg:='Cancel';        //A pending connection has been canceled before it became active. (Connection events only.)
    esUnwantedEvent : msg:='UnwantedEvent';    //Set by the ADO method, prevents subsequent notification of the event.
  end;
  Memo1.Lines.Add('======================');
  Memo1.Lines.Add(msg);
  Memo1.Lines.Add(Error.Description);
end;

и ничего не получается. Событие ADOConnection1InfoMessage не возникает ни при успешной операции, ни при ошибке.
Может это событие вообще никогда не работает и его нельзя использовать?

savinata

Дата 20.9.2013, 00:43 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 1
Регистрация: 20.9.2013
Где: Севастополь

Репутация: нет
Всего: нет

Как мне кажется АДО это что то такое, что само по себе живет в системе Делфи. Вот пишу с помощью этого компонента программу удаленного администрирования сайта мерии. Просто так забожалось руководству, так вот что заметила... То конектимся, то в ошибку рулим... как хочется так и пляшется.. Я не удивилась постовому выше, ибо АДО... ЭТО ЧТО ТО...

sg729

Дата 20.9.2013, 10:56 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 31
Регистрация: 17.5.2009

Репутация: нет
Всего: 1

Цитата(savinata @ 20.9.2013, 00:43)

Ну, почему, иногда ADO очень даже неплохо работает smile

Все в этом мире относительно, бывает и похуже... Вы через ADO хотя бы через раз коннектитесь, а я
вот здесь
к Firebird никак не могу подключиться smile

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Базы данных и репортинг \| Следующая тема »