Ver Mensaje Individual
  #1  
Antiguo 20-12-2006
Robert01 Robert01 is offline
Miembro
 
Registrado: feb 2006
Ubicación: Córdoba, Argentina
Posts: 895
Reputación: 19
Robert01 Va por buen camino
¿como graficar una función ingresada por el usuario?

Quiero graficar una función que selecciono desde un combobox, no hay problemas cuando ya está dicha función en items del combo

Código Delphi [-]
case ComboBox1.ItemIndex of
     0 : // función nn , y = nn(x)
           begin
                 X_Min:=(ScrollBar1.Position);
                 X_Max:=(ScrollBar2.Position);

                 Y_Min:= ScrollBar3.Position;
                 Y_Max:= ScrollBar4.Position;

                 IntervaloX := ScrollBar5.Position/10000;

                 Chart1.BottomAxis.Minimum     := X_Min;
                 Chart1.BottomAxis.Maximum     := X_Max;
                 Chart1.LeftAxis.Minimum       := Y_Min;
                 Chart1.LeftAxis.Maximum       := Y_Max;

                 Series1.Clear;
                 Chart1.Title.Text.Text := 'nn(x)';

                 x := Chart1.BottomAxis.Minimum;
                 repeat
                       begin
                             // esta es la función
                             y := nn (x);

                             if (y <= Chart1.LeftAxis.Maximum) and
                                (y >= Chart1.LeftAxis.Minimum) then
                             begin
                                   // dibuja la función
                                   Series1.AddXY (x,y,'',clRed);
                             end;
                             x := x + IntervaloX;
                       end;
                 until x >= Chart1.BottomAxis.Maximum;
           end;

La duda que tengo es como hacer cuando yo ingreso una función, sería algo así como una función ingresada por el usuario.
Responder Con Cita