Hola Caral. Mira te mando un ejemplo de como lo utilizo en forma generica un zquery.
Código Delphi
[-]Function InsertarBD(Tabla : String; Campos : array of string):String;
Var Sentencia : string;
i : integer;
Begin
Sentencia := 'INSERT INTO '+ Tabla +' VALUES(' + #39;
For i := 0 to length(campos) -1 do
Begin
If i = 0 then
Sentencia := Sentencia + Campos[i]
Else
Sentencia := Sentencia + #39 + ', ' + #39 + Campos[i];
End;
Sentencia := Sentencia + #39 + ')';
With LibreriaOperacional do
Begin
Consulta.Close;
Consulta.SQL.Text := sentencia;
Consulta.ExecSQL;
End;
result:=sentencia;
End;
No se, si es la mejor forma. Ademas esta funcion es solo para insertar valores de un vector, llamado campos. Con algunas modificaciones seguramente podras
Es funcion porque he utilizado los resultados string en este caso para guardar la consulta.
Espero que te sirva como guia. Saludos.