Ver Mensaje Individual
  #5  
Antiguo 19-11-2004
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Reputación: 10
marcoszorrilla Va por buen camino
Yo haría algo parecido a esto, cambia el código para tus tablas y campos.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add('Select Sum(horas) from Asistencias');
Query1.Sql.Add('Where Matricula = '+QuotedStr(Edit1.Text));
Query1.Open;
end;
{Pseudocódigo
if MiOtraTabla.Locate('El producto a actualizar') then
begin
MiOtraTabla.Edit;
MiOtraTabla.Campo.Value:=Query1.Fields[0].AsFloat
MiOtraTabla.Post;
end
else
ShowMessage('El producto no existe.');}

Al ser Xbase la tabla creo que esto sería lo más simple sumar el producto que se elija buscarlo en la otra tabla y actualizar su contenido.

Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita