FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
No me funcionan los eventos (?)
Hola a todos...
El problema que tengo y no puedo encontrar el error es el siguiente: (Trabajo con Delphi7, Firebird 1.5.3 y componentes FIBPlus) Tengo definido este trigger: CREATE TRIGGER "AsuntoNuevo" FOR FAM003 ACTIVE AFTER INSERT POSITION 0 AS BEGIN post_event('IngAsunto'); END Inserto un registro en la tabla FAM003: dm.tr.startTransaction; // data module Fam003.insert; . . (Valores de los campos...) . . Fam003.post; dm.tr.commit; Fam003.FullRefresh; La Propiedad ReceiveEvent de la Tabla Fam003 tiene IngAsunto El componente EventAlerter tiene este evento que nunca llega a ejecutarse if EventName = 'IngAsunto' then begin MessageDlg('Nuevo registro ...', mtWarning, [mbOK], 0); end; Mucho agradeceré si alguien puede ayudarme Saludos |
#2
|
||||
|
||||
Recuerda que para que funcionen tienes que registrarlos en el componente que maneja los eventos EventAlerter...
No recuerdo bien y no tengo Delphi a la mano pero creo que tiene una lista donde pones los eventos que deseas interceptar y luego llamas al metodo register o algo así.
__________________
"Hey, nena, debe ser genial ser tú y verme a mí mismo..." |
#3
|
|||
|
|||
Gracias Xander...
En el EventAlerter está registrado y tiene la opcion Autoregister activada... Saludos |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Como funcionan los ReportBuilder? | Irina | Impresión | 1 | 17-06-2007 00:16:52 |
Funciones que no funcionan | micayael | PHP | 2 | 13-09-2005 22:26:33 |
Cambio ordenador, componentes no funcionan | javiermorales | OOP | 4 | 10-11-2004 11:05:47 |
¿Cómo funcionan 2 ó más QRGroups en un QReport? | ciscu | Impresión | 5 | 15-12-2003 19:19:01 |
|