procedure CopyHtPanelToClipboard(HtPanel: THtPanel);
// Copy a "screenshot" (with transparent background) of the HtPanelPreview component to the clipboard
var
  Bitmap: iexBitmaps.TIEBitmap;
begin
  Bitmap := iexBitmaps.TIEBitmap.Create;
  try
    // Set the size of the bitmap to the size of the THtPanel:
    Bitmap.Width := HtPanel.Width;
    Bitmap.Height := HtPanel.Height;

    // Render the THtPanel onto the bitmap:
    HtPanel.PaintTo(Bitmap.Canvas, 0, 0);

    // testing the Bitmap at this stage:
    Bitmap.Write('C:\DELPHI\MyTest\test.png', ioPNG);

    // Get transparent color (transColor is type TRGB)
    var transColor := Bitmap.Pixels[0, Bitmap.Height - 1];

    Bitmap.SetTransparentColors(transColor, transColor, 0);

    // Copy the bitmap to the clipboard:
    Bitmap.CopyToClipboard(True, True); // Todo: The image background has artifacts!
  finally
    Bitmap.Free;
  end;
end;

var
  MyIO: TImageEnIO;
begin
  MyIO := TImageEnIO.Create(nil);
  try
    MyIO.CaptureFromScreen(iecsSpecifiedWindow, -1, HtPanelPreview.Handle);
    MyIO.IEBitmap.CopyToClipboard(True, True);
  finally
    MyIO.Free;
  end;