crear un trigger firebird desde delphi 2007
 

crear un trigger firebird desde delphi 2007.
osea con codigo delphi, sin necesidad de entar a firbird sql vs. 2.0.

:confused:

A ver como va este demo.

IBX:

Código Delphi [-]
 with Query1 do begin
  ParamCheck := False;
  with SQL do begin
    Clear;
    Add('CREATE PROCEDURE GET_NUMERO_CLIENTES');
    Add('RETURNS (NClientes integer)');
    Add('AS');
    Add('BEGIN');
    Add('  SELECT COUNT(CLIENTE_ID)');
    Add('  FROM CLIENTES');
    Add('  INTO :NCLientes;');
    Add('  SUSPEND;');
    Add('END');
  end;
  ExecSQL;
end;

FIBPlus:

Código Delphi [-]
 with pFIBQuery1 do begin
  ParamCheck := False;
  with SQL do begin
    Clear;
    Add('CREATE PROCEDURE GET_NUMERO_CLIENTES');
    Add('RETURNS (NClientes integer)');
    Add('AS');
    Add('BEGIN');
    Add('  SELECT COUNT(CLIENTE_ID)');
    Add('  FROM CLIENTES');
    Add('  INTO :NCLientes;');
    Add('  SUSPEND;');
    Add('END');
  end;
  Prepare;
  ExecQuery;
end;

Saludos cordiales

Aunque has puesto de ejemplo un "stored procedure", es igual para crear un trigger :)

Chuuuuuuuuuuuuuu...Parece que mi comprensión lectora no anda muy bien a esta altura del año...

Se me ha hecho eterno este 2013...:mad:

Saludos Casimiro

Será mejor que te tomes una infusión calentita y te vayas a dormir un rato :D:D:D