Ver Mensaje Individual
  #4  
Antiguo 13-02-2008
creedence creedence is offline
Miembro
 
Registrado: ene 2008
Posts: 14
Reputación: 0
creedence Va por buen camino
No es tan complicado

Hola, recien leo tu mensaje. Lo que tenes que hacer es definir una funcion (en el codigo la llamo FLineal) propia que sea lineal vos le pasas los parametros de pendiente y ordenada a origen (esto previamente calculado atraves de los dos puntos).

En el tchart definis dos series del tipo line..

Luego el codigo para dibujar la grafica es algo asi:

procedure TForm1.BitBtn3Click(Sender: TObject);
var x:integer;
y:extended;
begin
x:=-3;
while(x<= 4) do
begin
y:=Flineal(x);
Series1.addxy(x,y,'',clblue);
end;
end;

Eso es todo espero que todavia lo necesites! Saludos
Responder Con Cita