Delphi - locate con columna en dbgrid

 
Vista:

locate con columna en dbgrid

Publicado por el inexperto (12 intervenciones) el 20/12/2005 06:03:25
saludos tengo una duda con el locate y es que lo utilizo para hacer una actualizacion de la existencia de articulo desde el detalle de pedido. el problema es que solo me actualiza el registro donde esta posicionado el puntero del dbgrid y yo quisiera que me actualizara todos los articulos que estan en el dbgrid. gracias de antemano desde el primero hasta el ultimo me gustaria saber si existe otra forma de llevar a cabo esta actualizacion mediante codigo delphi. ya que he intendando todo sin embargo no he podido hacerlo.
dif:integer;
begin
dm1.tablaarticulos.Locate('codigo',dm1.tabladepedidoscodigoarticulo.AsString,[]);
dif:=dm1.tablaarticulosexistencia.AsInteger+dm1.tabladepedidosrecibido.asinteger;
if dif <0 then
begin
dm1.tablaarticulos.edit;
dm1.tablaarticulosexistencia.Value:=0 ;
end
else
dm1.tablaarticulos.edit;
dm1.tablaarticulos['existencia']:=dif;
dm1.tablaarticulos['total']:=dm1.tablapedidos['monto'];
dm1.tablaarticulos['ultimacompra']:=dm1.tablapedidos['fechaemision'];
dm1.tablaarticulos.post;
end;
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder