Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Events in IB/FB [D6, IB6.x, Firebird]

Dimedrol © (2002-07-19 18:18:00)
Коллеги, подскажите пожалуйста, как правильно хэндлить ивенты...

Есть процедура на сервере :

CREATE PROCEDURE CALL_EVENT AS BEGIN POST_EVENT "test_event"; END;

В моем приложении я использую TIBEvents.
AutoRegister=true Database=MyDBName Events= {Requested events : 1 - test_event} Registered=false

Исполняю процедуру... ОК !
procedure TForm1.SPExecClick(Sender: TObject); begin SP.Prepare;SP.ExecProc; end;

Пытаюсь отловить ивент.... НИФИГА ! Не реагирует...
procedure TForm1.IBEvents1EventAlert(Sender: TObject; EventName: String; EventCount: Integer; var CancelAlerts: Boolean); begin showmessage("EventName=""+EventName+"", EventCount="+inttostr(EventCount)); end;

Где же я накозлил ?

Dimedrol (2002-07-26 22:46:00) [1]
Совсем никто ???!! 8888-\

Dimedrol (2002-07-25 15:59:00) [2]
Коллеги, ну неужели никто не работал с Eventsв Delphi ?!

Dimedrol (2002-07-24 23:45:00) [3]
У мня в компоненте стоит
AutoRegister=true
Это не то ?

а что с
var CancelAlerts: Boolean ???

Johnmen (2002-07-24 09:37:00) [4]
Ну во-первых евент надо регистрить,
а во-вторых, не забывать про var CancelAlerts: Boolean

Dimedrol (2002-07-23 19:01:00) [5]
Да с самой базой все ОК.
Я вообще весь проэкт взял из статьи IBPhoenix...
Там просто открывается демо-база..
Я ее на Линух положил - все рулИт !

Простой респонд от процедуры я могу получить.
Строчку простую, в кач-ве ответа и т.п.,
а вот отреагировать на событие... никак ;-(

kaif (2002-07-20 01:16:00) [6]
Database=MyDBName ?
Это экземляр TIBDatabase?
У него Connected = True или нет?
вообще-то должно работать.
У меня Event-ы работают с IBX и Firebird. Правда я их редко использую.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »