title: Bitmap with transparency
body: <p>With code</p>
  
  <pre><code>
  procedure TForm2.Button1Click(Sender: TObject);
  var
    oMeta: TMetaFile;
    oBmp: TBitmap;
  begin
    Image1.Transparent := True;
    Image1.Picture.LoadFromFile('D:\data\WMF.wmf');
  
    oBmp := TBitmap.Create;
    try
      oMeta := TMetaFile(Image1.Picture.Graphic);
      oBmp.SetSize(oMeta.Width, oMeta.Height);
      oBmp.Canvas.Draw(0, 0, oMeta);
      oBmp.SaveToFile('D:\data\WMF.bmp');
    finally
      oBmp.Free;
    end;
  end;
  </code></pre>
  
  <p>I Show wmf image and create bmp file. Created bmp image I show with code</p>
  
  <pre><code>
  procedure TForm2.Button2Click(Sender: TObject);
  begin
    Image1.Transparent := True;
    Image1.Picture.LoadFromFile('D:\data\WMF.bmp');
  end;
  </code></pre>
  
  <p>but image is shown without transparency. Whay ? How can I show this bmp image with transparency ?</p>
  
  <p>TIA and best regards
  Branko</p>