Ver Mensaje Individual
  #22  
Antiguo 21-09-2012
Avatar de Casimiro Noteví
Casimiro Noteví Casimiro Noteví is offline
Merodeador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.670
Reputación: 10
Casimiro Noteví Tiene un aura espectacularCasimiro Noteví Tiene un aura espectacular
Entonces el código que ha puesto ecfisa te tiene que servir perfectamente.
Tienes que hacer click en el clientdataset1, luego en el inspector de objetos vas a la pestaña "eventos" y en el AfterPost le das doble click.
Se verá algo así:
Código Delphi [-]
procedure TForm1.clientdataset1AfterPost(DataSet: TDataSet); 
begin

end;

Y debes escribir lo tecleado por ecfisa;

Quedando así:

Código Delphi [-]
procedure TForm1.clientdataset1AfterPost(DataSet: TDataSet);   
begin
  with clientdataset2 do   
  begin     
    Edit;     
    FieldByName('EXISTENCIAS').Value := FieldByName('EXISTENCIAS').Value -       clientDataSet1.FieldByName('CANTIDAD').Value;     
  Post;   
end;
Responder Con Cita