MirrorFlip confusion.

[Bones]

Hi All

I'm trying to create a mirror effect using delphix and delphi 6 (See code below).

Problem is , the MirrorFlip property of my sprite seems to do nothing. the alpha-blending is working fine, but the reflection sprites dont flip. Can anyone see what I'm doing wrong ?

Thx

//============================================================================//
procedure TMainForm.FormActivate(Sender: TObject);
var
  i : Integer;
begin
  MainForm.DXDraw1.Initialize;
  MainForm.Timer1.Enabled := True;

  For i := 0 to 3 do begin
    With TjMenuitem.Create(MainForm.DXSpriteEngine1.Engine) do Begin
      Image := MainForm.Images1.Items[i];
      X := 100 + (100 * i);
      Y := 0;
      ItemNo := i;
      ReflectImage := TImageSprite.Create(MainForm.DXSpriteEngine1.Engine);
      ReflectImage.Image := Image;
      ReflectImage.X := X;
      ReflectImage.Y := Y + 60;
      ReflectImage.MirrorFlip :=  [rmfFlip];
      ReflectImage.BlendMode := rtBlend;
      ReflectImage.Alpha := 120;
    End;
  End;

end;
//============================================================================//