![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#6
|
||||
|
||||
|
Gracias a los dos
Me han aparecido algunos componentes nuevos, y en los que tenia han aparecido propiedades nuevas, esta bastante bien, Solo ..... que los dichosos IBEvents que es mi gran problema siguen sin funcionar alguien sabe por que la han tomado conmigo???? Esto es lo que hago: CREATE TRIGGER D_Empleado FOR EMPLEADOS AFTER DELETE AS BEGIN POST_EVENT "DEL_EMPLEADO"; END void __fastcall TForm1::FormShow(TObject *Sender) { IBEvents1 ->Events ->Add("DEL_EMPLEADO"); IBEvents1 ->RegisterEvents(); } void __fastcall TForm1::IBEvents1EventAlert(TObject *Sender, AnsiString EventName, int EventCount, bool &CancelAlerts) { ShowMessage(EventName); } Y tarari que te vi, cuando borro no sucede nada, lo cual esta bien porque antes de instalar los nuevos componentes se quedaba colgado. 1000 G. |
|
|
|