[AND_REY]

Простой пример рис по точкам из массива:

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
 Massiv: Array [0..5] of Integer;
 X,Y: Integer;
begin
 Massiv[0]:= 1;
 Massiv[1]:= 50;
 Massiv[2]:= 100;
 Massiv[3]:= 200;
 Massiv[4]:= 220;   
 Massiv[5]:= 250;    
 For X:= 0 To 5 Do
  begin
   Y:= Massiv[X];  
   Image1.Canvas.LineTo(X*50,Image1.Height-Y);
  end;
end;