[jaxik]

Здравствуйте уважаемые программисты!
Помогите пожалуйста добавить кромки к фигуре! На рисунке (во вложении) показано какие они должны быть. Полный исходник во вложении.

PHP код:

const 
   mCub=8; 


Type 
  TMain = record 
            X, Y, Z  : double; 
            Sd       : array[1..3] of byte; 
            Xe, Ye   : Integer; 
          end; 

  TCub  = array[1..mCub]  of TMain; 


const 

   Cub : TCub = ( 
 {1}  (X : -3;   Y: -10;   Z: -10;    Sd:(2,4,0)), 
 {2}  (X : -3;   Y: -10;   Z:  10;    Sd:(0,3,0)), 
 {3}  (X :  10;   Y: -10;   Z:  10;    Sd:(6,4,0)), 
 {4}  (X :  10;   Y: -10;   Z: -10;    Sd:(5,0,0)), 
 {5}  (X :  10;   Y:  10;   Z: -10;    Sd:(6,0,0)), 
 {6}  (X :  10;   Y:  10;   Z:  10;    Sd:(0,0,0)), 
 {7}  (X : -10;   Y:  10;   Z:  10;    Sd:(0,0,0)), 
 {8}  (X : -10;   Y:  10;   Z: -10;    Sd:(0,0,0)) 
 );