TComboEdit ItemIndex funktioniert in Firemonkey nicht

[mkinzler]

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  (ComboEdit1.Items as TStringList).CaseSensitive := True;
end;