All pastes #539673 Raw Edit

Stuff

public text v1 · immutable
·published 2007-06-05 09:23 UTC
rendered paste body
  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;