Para os feras em Delphi com Interbase/Firebird

Firebird

09/03/2003

Boa noite, Amigos!!

Estou precisando de uma informação de vocês. Existe alguma maneira de criar Stored Procedures Usando uma aplicação em Delphi em tempo de execução? Se existir Como tem de ser o código-fonte desta aplicação?

Obrigado!!


Janderson

Janderson

Curtidas 0

Respostas

Anonymous

Anonymous

09/03/2003

TEM SIM !

UTILIZE A API DO INTERBASE/FIREBIRD !
VEJA ALGUNS EXEMPLOS DE COMO UTILIZAR A API DO INTERBASE
REVISTA CLUBEDELPHI Nº 36


GOSTEI 0
Anonymous

Anonymous

09/03/2003

Não testei, mas tente executar as linhas de comando para a criaçao dentro de um componete TIBSQL, acho que dá certo.

----------------------------------------------------------------------

Caso a sua pergunta seja com relação acriaçao do componte TIBStoredProc faça o seguinte:

Exemplo de Procedure sem Parametros de entrada.

uses StoredProc;
.
.
.

function Exec_Proc(PN : String) :Variant
var
SP : TIBStoredProc
begin
try
sp := tibstoredProc.Create(self);
sp.database := seu.componente.ibdatabase;
sp.StoredProcName := PN;
sp.Prepare;
sp.ExecProc;
Result := sp.Params[0].value;
finally
FreeAndNil(SP);
end;
end;


GOSTEI 0
POSTAR