[ecfisa]

Hola.

Agregando algo a lo dicho por Neftalí y Delphius, para cambiar o dar forma a un componente revisá las funciones:

• CreatePolygonRgn
• SetWindowRgn

Un pequeño ejemplo del uso con un TPanel:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
const
   PTS: array [1..5] of TPoint =((X:10;Y:10),(X:150;Y:50),
      (X:250;Y:180),(X:50;Y:150),(X:10;Y:10));
var
  Reg : HRGN;
begin
  Panel1.Color := clLime;
  Reg := CreatePolygonRgn(PTS, 5, 1);
  SetWindowRgn(Panel1.handle, Reg, true);
end;

Saludos.