anchor.diff:    i: integer;
   begin
     hasChanged := False;
  +
  +  if (keycode= 58536) or (keycode= 58462) then
  +    FSpecialChar:= keycode;
   
     if not Enabled then
       consumed := False
  
positive.code:     FSelStart: integer;
      FSelOffset: integer;
      FCursorPos: integer;
      procedure   DoDropDown; override;
      function    GetText: string; virtual;
      function    HasText: boolean; virtual;
  
negative.code:   FDrawOffset       := 0;
    FSelectedItem     := -1;       // to allow typing if list is empty
    FNewItem          := False;
    FSpecialChar      := -1;
  
    CalculateInternalButtonRect;
  end;
  