  ___________________________________335

     ,   -
.         sin(X),  -
 Xmin^O, =4 (2   ), Ymin==-l, Ymax=l.

  ,     Image    -
 ,    OnClick   , -
  ,   :

ttdefine Pi 3.14159

float X,Y;         //  
int PX,PY;         //  
for (PX = 0;  <= Imagel->Width; ++)

(
//X  ,     

 =  * 4 * Pi / Imagel->Width;

Y = sin(X) ;

//PY   ,   Y

PY = Imagel->Height - (Y+1) * Imagel->Height / 2;

//    

Imagel->Canvas->Pixels[PX][PY] = clBlack;

)

  ,   (    )  -
.    . 5.7    .   
   .

. 5.7

   
 LineTo

5.1.3.3     Pen

    Pen  .  ,    
 .        Color  ,  -
 .    Width ( ).   
.     1.

 Style   .     -
 :

psSolid  

psDash  

psDot  

psDashDot - 

psDashDotDot ,   , 

psClear  

psInsideFrame  ,   Width > 1  , -
    Windows