bugs in "programing" change Port

nosek
2011-12-03
2013-04-30
  • nosek
    nosek
    2011-12-03

    I suggest change code:

    procedure TComComboBox.SetText(const Value: string);
    begin
      if Items.IndexOf(Value) > -1 then
      begin
        ItemIndex := Items.IndexOf(Value);
        Change;  // add line,    and begin, end too
      end
    end;

    I apologize for bad english