Как реализовать Edit с автозаполнением на С++

[Axbor]

Тут показано реализация на Delphi.

http://yaroslavbrovin.ru/new-approach-of-development-of-firemonkey-control-control-model-presentation-part-2-tedit-with-autocomplete-ru/

Я взял FMX.Edit.Autocomplete.pas и добавил в свой проект. И дальше делаю так:

void __fastcall TAddDataForm::provincePresentationNameChoosing(TObject *Sender, UnicodeString &PresenterName)

{
  PresenterName = "AutocompleteEdit-style";
}
//---------------------------------------------------------------------------

void __fastcall TAddDataForm::FormCreate(TObject *Sender)
{
	String SuggestionList[] = {"Apple","Alow", "Bottom" "Window", "Salom", "Zepto"};
	province->Model->Data["suggestion_list"] = (TValue::From<String*>(SuggestionList));
}
//---------------------------------------------------------------------------

но ничего не выходит. Что я делаю не так?

[Axbor]

Решил проблему с добавлением Unit  вот такого вида:

unit Unit1;

interface

uses
  System.SysUtils, System.Types, System.UITypes, System.Classes,
  System.Variants,
  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.StdCtrls,
  FMX.Controls.Presentation, FMX.Edit;

procedure setmodeldata(Edit: TEdit);

implementation

uses
  System.Rtti;

procedure setmodeldata(Edit: TEdit);
var
  SuggestionList: TArray<string>;
begin
  SuggestionList := ['Россия', 'Украина', 'Белорусь', 'Азербайджан', 'Армения',
    'Грузия', 'Казахстан', 'Киргизстан', 'Латвия', 'Литва', 'Молдавия'];
  Edit.Model.Data['suggestion_list'] := TValue.From < TArray < string >>
    (SuggestionList);
end;

end.

и вызвал функцию setmodeldata с моей формы.