SetWindowLong(ThisForm.HWnd,GWL_EXSTYLE, BITOR(BITXOR(OldLong,WS_EX_LAYOUTRTL),WS_EX_NOINHERITLAYOUT))