[Lazarus] BidiMode improvments patch

[Zaher Dirkey]

Hi again

I have some functions used to make the controls draw Right To Left
Can i put it in
1 - Controls.pas unit
2 - Make a new unit "BidiUtils.pas" and then use it in this controls units

-------
function BidiFlipAnchors(Anchors: TAnchors; Flip: Boolean): TAnchors;
function BidiFlipAlignment(Alignment: TAlignment; Flip: Boolean): TAlignment;

function BidiFlipRect(const Rect: TRect; const ParentRect: TRect;
const Flip: Boolean): TRect;
function BidiFlipPoint(P: TPoint; const ParentRect: TRect; const Flip:
Boolean): TPoint;
function BidiFlipX(X: Integer; const Width: Integer; const Flip:
Boolean): Integer;
function BidiFlipX(X: Integer; const ParentRect: TRect; const Flip:
Boolean): Integer;
-------

-- 
Zaher Dirkey