TIbquery

[nenufer]

Hola!! Vereis tengo un procedimiento al cual le paso como parametro un array dinamico string para los campos de la tabla y un string que sera el nombre de la tabla. Tengo otro array dinamico declarado global para los valores(VNuevos). En este procedimiento es dnd voy a realizar una consulta insert. Mi problema es q no tengo ni idea de como recorrer los dos arrays para poder hacer la consulta. Yo hago lo siguiente:

procedure TForm1.OpInsert(campos : array of string; Tabla:String);
var
i,j : integer;
begin
with DM do
begin
for i:=0 to high(campos) do
QrOperacion.SQL.Add('insert into ' + Tabla + '(' + campos[i] + ')');
for j:=0 to high(VNuevos) do
QrOperacion.SQL.Add('values (' + VNuevos[j] + ')');
QrOperacion.open;
end;

end;

El error que me da es: Acces violation at address 00404567;

A ver si alguien puede ayudarme. Muxas gracias