请问为什么Timage的Transparent属性在有机器可以透明有的却不行?

procedure TFormMain.Button1Click(Sender: TObject);
var
  myBMP: TBitmap;
  myCol : Integer;
  myRow : Integer;
  myRNum, myCount: Integer;
  myCanvas: TCanvas;
begin
  myCanvas := nil;  FormMain.ImageRN66.Picture.Assign(nil);
  FormMain.ImageRN66.Width := 176;
  FormMain.ImageRN66.Height := 96;
  myBMP := TBitmap.Create;
  myBMP.Width := 176;
  myBMP.Height := 96;
  Randomize;
  myCanvas := myBMP.Canvas;
  myCanvas.Lock;
  try    myCol := 1;
    myRow := 0;    for myCount := 1 to 66 do
    begin      inc(myRow);
      if myRow > 6 then
      begin
        myRow := 1;
        inc(myCol);
      end;
      //画图      myRNum := RandomRange(-1, 2);
      if myRNum = 0 then
      begin
        myCanvas.Draw((myCol - 1) * 16, (myRow - 1) * 16, FormMain.Image3RG.Picture.Bitmap);
      end
      else if myRNum < 0 then
      begin
        myCanvas.Draw((myCol - 1) * 16, (myRow - 1) * 16, FormMain.Image3RR.Picture.Bitmap);
      end
      else
      begin
        myCanvas.Draw((myCol - 1) * 16, (myRow - 1) * 16, FormMain.Image3RB.Picture.Bitmap);
      end;
    end;  except
  
  end;  myCanvas.Unlock;
  myCanvas := nil;
  FormMain.ImageRN66.Picture.Bitmap.Assign(myBMP);
  
  myBMP.Free;
  
end;