for i:=0 to pressUnits.Count-1 do
   begin
    if(DGPressUnit(pressUnits[i]).selected) then
    begin
      temp:=pressUnits[i];
      elemToRem:=True;
    end;
   end;
   if elemToRem then
   begin
    binUnits.Add(temp);
    pressUnits.Remove(temp);
   end;