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

[Matze]

Hallo, herzlich willkommen.

Dein Code ist ja schrecklich formatiert.

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.