Procedure Bar3D (X1,Y1,X2,Y2 : Integer; depth : Word; Top : Boolean) ;
Draws a 3-dimensional Bar with corners at (X1,Y1) and (X2,Y2) and fills it with the current color and fill-style. Depth specifies the number of pixels used to show the depth of the bar.
If Top is true; then a 3-dimensional top is drawn.
None.