TCanvas3D.RoundRectWithZ
TCanvas3D
procedure
RoundRectWithZ(Const R: TRect; X, Y, Z: Integer);
virtual;
Unit
TeCanvas