GDI+ Halbtransparentes Image

[Dunkelbunt27]

Hallo Delphi-PRAXIS,

ich nutze GDI+ und habe folgende Frage:
ich habe zwei TImages die auf dem Formular schon vorhanden sind.
Das hintere TImage zeigt irgendetwas ganz normal und untransparent an.
Das vordere ist schmaler und in Balkenform, soll aber halbtransparen (Alpha 80% oder so) darübergelegt werden (verschiebbar sein usw).

Die eigentlichen Bilddateien sollen nicht aus einer Datei geladen werden, sonder sind schon in das TImage rein geladen (also im Objektinspektor, Image.Picture).

Ist es möglich, dass zwei unabhängige TImage Komponenten übereinander zu haben und trotzdem die obere halbtransparent darzustellen?
Das ganze muss möglichst Ressourcensparend sein...

Hier erstmal der Quelltext wie ich es mit gedachte habe. (Funktioniert nicht)

Delphi-Quellcode:

procedure TForm1.Image1Click(Sender: TObject);
const
  ColorMatrix: TGPColorMatrix = (
    M: ((1.0, 0.0, 0.0, 0.0, 0.0),
        (0.0, 1.0, 0.0, 0.0, 0.0),
        (0.0, 0.0, 1.0, 0.0, 0.0),
        (0.0, 0.0, 0.0, 0.8, 0.0),  //80% Alpha für jeden Pixel
        (0.0, 0.0, 0.0, 0.0, 1.0)));
var
  Graphics, Graphics2    : IGPGraphics;
  Balken      : IGPBitmap;
  Hintergrund : IGPBitmap;
  Attr        : IGPImageAttributes;
  SolidBrush  : IGPSolidBrush;
begin
  Graphics  := Image1.ToGPGraphics;
  Graphics2 := Image2.ToGPGraphics;

  //Weißer Hintergrund
  SolidBrush := TGPSolidBrush.Create(TGPColor.Create(255, 255, 255, 255));
  Graphics.FillRectangle(SolidBrush, 0, 0, Image1.Width, Image1.Height); //macht das überhaupt Sinn?

  Hintergrund := TGPBitmap.Create(Image1.Picture.Bitmap);
  Balken      := TGPBitmap.Create(Image2.picture.Bitmap);
  Attr        := TGPImageAttributes.Create;
  Attr.SetColorMatrix(ColorMatrix, ColorMatrixFlagsDefault, ColorAdjustTypeBitmap);

  //Hintergrund
  Graphics.DrawImage(Hintergrund,0,0);  //normal zeichnen

  //Balken
  Graphics2.DrawImage(Balken,
      TGPRect.Create(0, 100, Hintergrund.Width, Balken.Height),  //halbtransparent darüber
      0, 0, Balken.Width, Balken.Height,
      UnitPixel, Attr);
end;

Ich hoffe jemand kann mir da weiterhelfen.
Schonmal Danke und ein Frohes Neues Jahr