Panel transparente o bevel con esquinas redondeadas

[edelphi]

holas a todos los foristas bueno mi pregunta es la siguiente:

Me gusataria hacer que un objeto Tpanel lo pueda hacer transparente hay alguna manera de hacer eso
o sino mejor aun encontre este codigo para redondear las esquinas de un control pero lo malo es que no funciona con el objeto TBevel que es transsparente como yo quiero.

Código Delphi [-] (http://www.clubdelphi.com/foros/#)
procedure DrawRounded(Control: TWinControl) ;
var
R: TRect;
Rgn: HRGN;
begin
with Control do
begin
R := ClientRect;
rgn := CreateRoundRectRgn(R.Left, R.Top, R.Right, R.Bottom, 20, 20) ;
Perform(EM_GETRECT, 0, lParam(@r)) ;
InflateRect(r, - 4, - 4) ;
Perform(EM_SETRECTNP, 0, lParam(@r)) ;
SetWindowRgn(Handle, rgn, True) ;
Invalidate;
end;
end;





en Conclusion lo que deseo es hacer un objeto bevel con las esquinas redondeadas. espero que me puedan ayudar