Frühlingsrolle hat folgendes geschrieben : |
Gern geschehen, auch wenn du die Tipps gekonnt ignorierst. |
Ich kann leider mit vielen Dingen nichts anfangen, da wir erst ein Jahr Info haben und unser Lehrer uns ins kalte Wasser geworfen hat, als er gemeint hatte, dass wir jetzt Projektarbeit machen^^
Deswegen verlasssen mich auch meine kognitiven Fähigkeiten, wenn ich den neuen Quellcode von dir betrachte
Da ich das Projekt für nächste Woche fertig haben soll, beschränke ich mich auf die "einfacheren" Programmierungen, die ich schneller kapiere... danach baue ich das alles noch aus und verbessere es. Nun zu der Erklärung meines Quellcodes:
x ist die globale Variable, die ich im Timer als Anfangsposition des Images nehme. Die Zahl wird gewürfelt, ist also die Zahl, wie weit man gehen darf.
Hier die Programmierung des Timers:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10:
| procedure TForm1.Timer2Timer(Sender: TObject); begin if ImOrange4.Left < x +55 then ImOrange4.Left := ImOrange4.Left +1;
if ImOrange4.Left = x +55 then begin Timer2.Enabled := false; end; end; |
Der Timer funktioniert eigentlich, mein Problem liegt darin, dass wenn ich die showmessage, die die Zahl anzeigt, nicht habe, das Image nur um 1 (also, als ob man nur eine 1 gewürfelt hätte)nach rechts geht
Moderiert von Narses: Delphi-Tags hinzugefügt