Código Delphi [-] var i: Integer; begin for i := 0 to DBGrid1.SelectedRows.Count-1 do begin //Realizar acción end; end;
var i: Integer; begin for i := 0 to DBGrid1.SelectedRows.Count-1 do begin //Realizar acción end; end;