Ver Mensaje Individual
  #1  
Antiguo 26-04-2007
Avatar de jorelivi
jorelivi jorelivi is offline
Miembro
 
Registrado: abr 2007
Posts: 45
Reputación: 0
jorelivi Va por buen camino
Actualizar campo de dbgrid

Tengo un Dbgrid con multiselect y solo quiero actualizar solo los que seleccione y me cambia todos los que muestra el DbGrid.

Solicito su ayuda y gracias por las indicaciones para llegar a este foro.

Código Delphi [-]
 Codigo Delphi

  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
       If MessageDlg('Desea actualizar los registros',mtConfirmation,[mbYes,mBNo],0)= MrYes Then Begin
           sQuery:='Update cuen01 Set Fecha_venc=Fecha_apli+ias';
           Query1.Close;
           Query1.SQL.Clear;
           Query1.SQL.Add(sQuery);
           Query1.ParamByName('dias').AsInteger:=StrtoInt(Edit4.Text);
           Query1.ExecSQL;
        End;
     end
__________________
La sabiduría de los sabios y la experiencia de los siglos pueden ser conservadas con las citas.
Atte.
Jorelivi

Última edición por jorelivi fecha: 26-04-2007 a las 22:31:01.
Responder Con Cita