Hilfe, bei Parametrisieren

[Chris211183]

Das ist mein Ansatz....

Delphi-Quellcode:

procedure THixHistoGraph.DrawMeasureValue;
var
   HistoBackround              : TRect;
   x0, y0, dx, dy              : Real;
   i                           : Integer;
   P                           : TPointDynArray;

begin
      // Hintergrund der Darstellungsfläche
      HistoBackround :=  Rect(FGapLeft,                                         
                              FGapTop,
                              Width - FGapRight,
                              Height - FGapBottom + 2);

      x0 := 0;
      y0 := 0;
      dx := 0.05;
      dy := 0.05;

      for i:= 0 to (Width - 1) do
      begin
      x0 := i;
      y0 := Height;
      P := CalculatePointView(mysin, HistoBackround, x0, y0, dx, dy);  
      // berechnet Funktion aus Messdaten
      Canvas.Brush.Color := cllime;
      Canvas.Pen.Color   := cllime;
      Canvas.Pen.Style   := psSolid;
      DrawPointView(Canvas, HistoBackround, P);
      end;
end;