Update para un campo dbgrid multiselect
 

Este es mi codigo que tengo en un boton para actualizar dos situaciones diferentes dentro de un grid. pero no lo hace alguien me puede ayudar.

Código Delphi [-]
procedure TForm1.BitBtn2Click(Sender: TObject);var sQuery:String;var I:Integer;begin  if DbGrid1.SelectedRows.Count>0 then  // por si solo seleccionan uno...     for I := 0 to DbGrid1.SelectedRows.Count-1 do     begin       DbGrid1.DataSource.DataSet.BookMark := DbGrid1.SelectedRows[i];       // Todo lo que tengas que hacer           sQuery:='Update cuen01 Set Fecha_venc=Fecha_apli+:Dias';           Query1.Close;           Query1.SQL.Clear;           Query1.SQL.Add(sQuery);           Query1.ParamByName('dias').AsInteger:=StrtoInt(Edit4.Text);           Query1.ExecSQL;     end  else  // Todo lo que tengas que hacer   If MessageDlg('Desea actualizar los registros',mtConfirmation,[mbYes,mBNo],0)= MrYes Then Begin       sQuery:='Update cuen01 Set Fecha_venc=Fecha_apli+:Dias Where cclie=:cclie';       Query1.Close;       Query1.SQL.Clear;       Query1.SQL.Add(sQuery);       Query1.ParamByName('cclie').AsString:=Edit1.Text;       Query1.ParamByName('dias').AsInteger:=StrtoInt(Edit4.Text);       Query1.ExecSQL;    End;end;

Espero esto sea mas claro, sigo en linea y gracias por tu tiempo

__________________

Hola
En esto hay que tener un poco de paciencia, ya te respondera alguien aqui:
http://www.clubdelphi.com/foros/showthread.php?t=42963
Recuerda que hay muchos foristas.
No es bueno abrir mas hilos ya que no podras seguir uno asta llegar a su solucion.
Paciencia.
Saludos