[aanil]

Hola Caral.

Guiandome por el ejemplo que me enviaste hice esto:

procedure TForm3.BitBtn3Click(Sender: TObject);
begin

Código SQL [-]
datam.Query1.First;
   while not datam.Query1.Eof do   // recorre la tabla y hace el update
   begin
    datam.Query1. sql.Text := 'Update 20092 set practica = '+datam.Query1Practica.AsString+' where matricula = '+QuotedStr(datam.Query1matricula.AsString);
    datam.Query1.SQL.Text := 'Update 20092 set parciales = '+datam.Query1Parciales.AsString+' where matricula = '+QuotedStr(datam.Query1matricula.AsString);
    datam.Query1.SQL.Text := 'Update 20092 set calf_final = '+datam.Query1calif_final.AsString+' where matricula = '+QuotedStr(datam.Query1matricula.AsString);

    datam.Query1.ExecSQL;
  datam.Query1 .Next;

end;
end;


procedure TForm3.BitBtn2Click(Sender: TObject);
begin

Código SQL [-]
datam.Query1.SQL.Text := ' select *,(exp + expgrup+ pract1 + pract2+ pract3 + pract4 + pract5) As Practica from 20092';
datam.Query1.SQL.Text := ' select *,( parcial1 + pasrcial2) As parciales from 20092';
datam.Query1.SQL.Text := ' select *,( practica + parciales + final) As Calf_final from 20092';
 datam.Query1.Open;

end;

end.


El error se produce en datam.Query1 .Next;

Dice error de sintaxis en la instrucción UPDATE

Mas o menos siento que estoy cerca de llegar al final de mi proyecto, pero me falta algo por comprender.

Sera que debo de usar EQTemp.Sql? y no se de donde sale.

Gracias