ComboEdit-如何在Popup事件上刷新项目?

时间:2019-04-08 11:03:06

标签: android delphi popup firemonkey

我在Android上的ComboEdit遇到问题。我需要在OnPopup事件中将项目添加到ComboEdit.Items,但是在第二次显示弹出窗口之后,我的项目才可见。如何在OnPopup事件中刷新项目?

procedure TForm1.ComboEditPopup(Sender: TObject);
begin
    ComboEdit1.Items.Add('MyItem'); // this item will by visible at next popup
end;

我想要实现的目标: 项目:“ Aaa”,“ Bla”,“ Ble”,“ Dee”。 用户写“ Bl”。当他按下Popup时,ComboEdit将向他显示以下项目:“ Bla”,“ Ble”

我当前的代码:

ComboEdit : TComboEdit;
Items : TStringList; // around 1000 strings

    procedure TForm1.ComboEdit1Typing(Sender: TObject);
    var 
        i : integer;
    begin
        ComboEdit.BeginUpdate;

        ComboEdit.Items.Clear;
        for i := 0 to Items.Count-1 do
          if AnsiStartsText(ComboEdit.Text,Items[i]) then
            ComboEdit.Items.Add(Items[i]);

        Items.EndUpdate;
    end;

0 个答案:

没有答案