Estimados amigos , otro problema, tengo un unit en el cual deseo crear una funcion para ejecutar una consulta, un unit sin form, la idea es que cuando quiera ejecutar la consulta llame a ese unit.funcion y le pase los parametros y listo, pero estoy teniendo problemas con la creacion de la consulta, al hacer el query.create(), me tira error de falta de parametros, al poner query.create(self) me indica q no esta definido
ahi va un ejemplo
Cita:
procedure xxx;
var con: TIBQuery;
begin
con.Create(>>acca q pongo???<<);
con.Database:= principal.Base_de_Datos;
con.Transaction:= principal.Transaccion;
con.Close;
con.SQL.Clear;
con.SQL.Add(aux);
con.ExecSQL;
con.Free;
end;
|