Нужно сделать так, чтобы на моей прозрачной форме был виден помещённый на неё рисунок.

Ищи информацию по регионам - CreateEllipticRgn, SetWindowRgn и т.д.

Вообще все достаточно просто. У формы есть свойство TransparentColor кажется. Его устанавливаешь в черный, цвет формы тоже в черный + еще какое-то свойство связанное с этим надо установить в истину.Извини, лень запускать Delphi и смотреть...
Насчет CreateEllipticRgn, SetWindowRgn совет хорош, но для такого простого случая париться с этим будет напряжно.

Нашел кое что вроде бы работает

var FullRgn, ClientRgn, CtlRgn : THandle;

procedure TForm1.DoInvisible;
var

AControl : TControl;
A, Margin, X, Y, CtlX, CtlY : Integer;
begin

Margin := ( Width - ClientWidth ) div 2;
FullRgn := CreateRectRgn(0, 0, Width, Height);
X := Margin;
Y := Height - ClientHeight - Margin;
ClientRgn := CreateRectRgn( X, Y, X + ClientWidth, Y + ClientHeight );
CombineRgn( FullRgn, FullRgn, ClientRgn, RGN_DIFF );


for A := 0 to ControlCount - 1 do begin
AControl := Controls[A];
if ( AControl is TWinControl ) or ( AControl is TGraphicControl )
then with AControl do begin
if Visible then begin
CtlX := X + Left;
CtlY := Y + Top;
CtlRgn := CreateRectRgn( CtlX, CtlY, CtlX + Width, CtlY + Height );
CombineRgn( FullRgn, FullRgn, CtlRgn, RGN_OR );
end;
end;
end;
SetWindowRgn(Handle, FullRgn, TRUE);
end;


procedure TForm1.FormDestroy(Sender: TObject);
begin

DeleteObject(ClientRgn);
DeleteObject(FullRgn);
DeleteObject(CtlRgn);
end;

procedure TForm1.DoVisible;
begin

FullRgn := CreateRectRgn(0, 0, Width, Height);
CombineRgn(FullRgn, FullRgn, FullRgn, RGN_COPY);
SetWindowRgn(Handle, FullRgn, TRUE);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin

DoInvisible;

end;

Можно задать прозрачность на какой нибудь уникальный цвет. Например задай цвет формы

Код

color:=$5645ea; Transparent:=true; TransparentColor:=color;

Прозрачными будут участки с цветом $5645ea.

форму делаешь серым цветом, а кнопку красным.
в свойсвах формы ставишь
TransparentColor:=true;
TransparentColorValue:=серый;
а свойсво Transparent, по-моему вообще не трегаешь