anchor.diff:      FSelOffset := 0;
     end;
   
  -  if consumed then
  +  if consumed and hasChanged then
       RePaint;
   
     if hasChanged then
  
positive.code: 
  function TfpgAbstractEditCombo.HasText: boolean;
  begin
    Result := FocusItem > 0;
  end;
  
  procedure TfpgAbstractEditCombo.DoDropDown;
  
negative.code:           if FSelectedItem > -1 then
              SetText(Items[FSelectedItem])
            else
              SetText(FText);
            FSelectedItem:= -4;      // detects return has been pressed (must be 4 due to number of repaints)
            if FNewItem and (FAllowNew = anYes) then
              FItems.Add(FText);
  