anchor.diff:    //orwah
     if bidimode=bdRightToLeft then
   begin
  +StyleElements := [ seBorder, seFont]; //   
     Params.Style := Params.Style or TVS_RTLREADING;
     Params.ExStyle := Params.ExStyle or WS_EX_LAYOUTRTL or WS_EX_RIGHT;
   end;
  
positive.code:       //orwah
  if bidimode=bdRightToLeft then
  begin
  Params.Style := Params.Style or TVS_RTLREADING;
  Params.ExStyle := Params.ExStyle or WS_EX_LAYOUTRTL or WS_EX_NOINHERITLAYOUT;
  end;
  
negative.code:   Details: TThemedElementDetails;
  begin
    if (PageControl <> nil) and StyleServices.Enabled and
      //orwah (seClient in PageControl.StyleElements) and
       ((PageControl.Style = tsTabs) or TStyleManager.IsCustomStyleActive) then
    begin
      GetWindowRect(Handle, R);
  