Ver Mensaje Individual
  #12  
Antiguo 15-10-2008
[FGarcia] FGarcia is offline
Miembro Premium
 
Registrado: sep 2005
Ubicación: Cordoba, Veracruz, México
Posts: 1.123
Reputación: 22
FGarcia Va por buen camino
Bueno, despues de andar reinventando el hilo negro y no se que carajos traia en la cabez esto quedo asi:

Código Delphi [-]
procedure TdmDatos.BorrarDatosBascula(indice: integer);
begin
  //Cambie el dataset por un query
   with qyApoyo do
    begin
      Close;
      SQL.Text := 'DELETE FROM DATOS WHERE BASCULA = :indice';
      Params.ParamByName ('indice').Value := indice;
      ExecSQL;  //Aqui usaba open 
    end;
 
  //Aqui actualizo la parte visual de los datos
  qyResumen.Close ;
  qyResumen.Open ;
  qyPlot.Close ;
  qyPlot.Open ;
end;

¡Gracias por la ayuda!
__________________
ESTO ES UN FORO ... NO UN MÓVIL
¿Por qué no escribir de una manera comprensible para que los humanos lo podamos entender?
Responder Con Cita