Yo prefiero:
Código Delphi [-]
var q:Tquery;
begin
q := CreateQry('select * from tabla');
...
FreeAndNil(q);
end;
La función crea en ejecución el query, asigna el database y asigna el sql. Después ya puedo usar q.Execsql o q.Open según necesite.
Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
|