寻找可以斜放的Panel组件?

各位高手，请问哪里有可以让panel斜着放的控件。我试了如下方法：procedure TForm4.btn1Click(Sender: TObject);
var
  Points:array[0..3] of TPoint
  Rgn:HRGN;
begin  Points[0]:=Point(StrToInt(edtPiont1X.Text),StrToInt(edtPiont1Y.Text));
  Points[1]:=Point(StrToInt(edtPiont2X.Text),StrToInt(edtPiont2Y.Text));
  Points[2]:=Point(StrToInt(edtPiont3X.Text),StrToInt(edtPiont3Y.Text));
  Points[3]:=Point(StrToInt(edtPiont4X.Text),StrToInt(edtPiont4Y.Text));  Rgn:=CreatePolygonRgn(Points,4,ALTERNATE);  SetWindowRgn(pnlbg1.Handle,Rgn,True);
  DeleteObject(Rgn);
end;　　这种方法，只是在原来panel的基础上进行了裁剪，并不是真正让panel倾斜显示。请各位高手帮忙，谢谢！