consulta con data time picker
 

queremos hacer un recordatorio de eventos utilizando mysql firebird/interbase, hicimos un trigger que nos informara cuando se agrega un nuevo registro y así capturarlo por ibevents.

Código SQL [-]
CREATE TRIGGER POST_NEW_REG FOR CLIENTES
ACTIVE AFTER INSERT
POSITION 0
AS
BEGIN
  
  POST_EVENT 'new_reg';
END

Código Delphi [-]
procedure TDataModule_PROYECTO.DataModuleCreate(Sender: TObject);
Var
 BaseDeDatos: String;
 IniFile: TInfile;
begin
   // Obtiene la ruta y el nombre de la base de datos
   IniFile := TIniFile.Create(ExtractFilePath(Application.ExeName)+'BDatos.ini');
   BasedeDatos := IniFile.ReadString('BD','Path','');
   If BasedeDatos = '' then
    ShowMessage('Error al cargar Base de Datos') else
   Begin
    Try
      BaseGeneral.IBDatabase_proyecto := BaseDeDatos;
      BaseGeneral.Connected := True;
      Transaccion.Active := True;
      AGENDA.Open;
      IBEvents1.Events.Clear;
      IBEvents1.Events.Add('new_reg');
      IBEvents1.RegisterEvents;
    Except
      ShowMessage('No se puede conectar el servidor...');
    End;
   End;
end;

procedure TDataModule_PROYECTO.IBEvents1EventAlert(Sender: TObject;
  EventName: String; EventCount: Integer; var CancelAlerts: Boolean);
begin
  if EventName = 'new_reg' then
  Begin
  ShowMessage('Se inserto registro nuevo');
  SAGENDA.IBDataSet_AGENDA.Refresh;
  End;
end;

lo que quisiéramos saber es si le estamos errando en algo por que nos tira error de que IniFile: TInfile como que no estas declarado.
Muchas gracias.

¿Y cual es exactamente el mensaje de error?

¿Y por qué lo titulas "consulta con data time picker"? :confused:

Recuerda poner títulos descriptivos a tus preguntas, gracias.

¿Y entonces es en mysql, firebird o interbase?
:confused::confused::confused:

Capaz nomás que Oracle, Embarcadero y Firebird Project se fusionaron y lanzaron un motor de base de datos único y nosotros ni enterados. :D La pregunta que me hago es ¿Dual? ¿Open Source? ¿Privativo? :rolleyes:

Saludos,