Problem mit graphischer Darstellung!!! Bitte um Hilfe!!

[sneak87]

Hi,
ich habe mir ein Programm geschrieben, ist aber noch lange nciht fertig, aber jetzt habe ich auf einmal festgestellt, nachdem ich die werte in die Editfenster eingegeben habe und dann auf berechnen gehe und danach auf Start, erscheint zwar der richtige Graph aber noch eine ungewöhnliche Gerade, die einfach vom Startpunkt zu irgendeinem punkt in der Ebene geht...

könnt ihr euch den Quellcode incl Programm anschauen, weil ich finde da überhaupt keinen Fehler..

würde mich um Hilfe freun...

mfg Lars

[Matze]

Hallo, herzlich willkommen.

Dein Code ist ja schrecklich formatiert. :zwinker:

Der Fehler liegt darun, dass du im ersten Schritt ein LineTo aufrufst, ohne davor an die Startposition "gesprungen" zu sein.

Lösen kannst du das folgendermaßen:

Delphi-Quellcode:

procedure TSimu.ButtonStartClick(Sender: TObject);
begin
  bewegung:=true;
  Image1.Canvas.MoveTo(150 + Round(i), 324 - Round(y_wert));  // Startposition setzen
  starten;
end;

Viel Erfolg.

[sneak87]

ja ich weiß ich hab ja noch vor, den ordentlich zu formatieren, aber ich hab immerwieder code hinein kopiert und entfernt, deshalb ist es ein bisschen undurchsichtig... kommt noch

achso, danke für die Idee, jetzt funktioniert es einwandfrei, thx

mfg Lars