Ver Mensaje Individual
  #8  
Antiguo 30-05-2008
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Reputación: 24
enecumene Va por buen camino
Código Delphi [-]
 SQLadd.Close;
    SQLadd.SQL.Clear;
    SQLadd.SQL.add('update stocks set cantidad=cantidad+'+cantidad.text);
    SQLadd.SQL.add('where sucursal='''+GRIDStocks.DataSource.DataSet.FieldByName('sucursal').AsString+'''');
    SQLadd.SQL.add('and telefono='''+GRIDStocks.DataSource.DataSet.FieldByName('telefono').AsString+'''');
    SQLadd.ExecSQL;
    CDSStocks.Refresh;
    GRIDStocks.refresh;
    Showmessage('Se han añadido '+cantidad.text+' unidad/es del teléfono seleccionado en la sucursal seleccionada.');

Saludos.
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.
Responder Con Cita