Проблема с отображением формы и компонентов в режиме "RightToLeft" (RTL)

[NeonSimfi]

Перед созданием формы делаю следующие:

  SysLocale.MiddleEast := True;
  if SysLocale.MiddleEast then
   Application.BiDiMode := bdRightToLeft;
При создание формы:
  if SysLocale.MiddleEast then
  begin
    SetWindowLong(Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE) or WS_EX_LAYOUTRTL or WS_EX_NOINHERITLAYOUT);
    for i := 0 to ControlCount - 1 do
          Controls[i].BiDiMode := Application.BiDiMode;
  end;

В результате форма и большинство компонентов отображается "правильно" (RTL), а вот ComboBox не работает (при клике пропадает)...
Подскажите, пожалуйста...