Insert continuo entre dos fechas

[[enecumene]]

Empezado por Caral

Hola
Código SQL [-]Insert Between +DateTimePicker1.Date+ and +DateTimePicker2.Date+ Where Usuario = Tu

Saludos

Hola, me es imposible usar esa sentencia ya que está incompleta, no indicas los campos ni tablas a insertar .

Bueno, intenté hacer algo como esto, pero dada mi ignorancia no tenía que funcionar :

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var I: TDateTime;
begin
for I := StrToDate(Edit1.Text) to StrToDate(Edit2.Text) - 1 do
  begin
    ZQuery1.SQL.Text := 'Insert Into PRUEBA(REGNO,EMPID,EMPLEADO,FECHA) VALUES(NULL,1,:NOM,:FEC)';
    ZQuery1.ParamByName('NOM').AsString := 'Fernando';
    ZQuery1.ParamByName('FEC').AsDate := I;
    ZQuery1.ExecSQL;
  end;
end;

No me funcionó ya que para un ciclo for debe ser de tipo ordinal.

Saludos.