Hallo erstmal.
Verbesserungsvorschläge:
* [DEHLPI]-Tags verwenden
* die Codeformatierung ist auch nicht die Beste ... ist nicht gur erkennbar was wozu gehört.
* Kommentare ala
//Links
wären unnötig, wenn die Komponenten und Methoden ordentlich/entsprechend benannt worden wären.
* Warum sind MannX bis JagdY global deklariert?
Rate mal, warum es z.B. den PRIVATE-Abschnitt in der Form gibt.
* Die Variable Form1 solltest du besser ignorieren und nicht darauf zugreifen.
Delphi-Quellcode:
Button5.Visible := true;
Canvas.Brush.Color := clred;
Form1.Canvas.Rectangle(MannX,MannY,MannX+50,MannY+ 50);
Wie du selbst bemerkt hast (beim Brush), kann man innerhalb von TForm1-Methoden auch so auf das Canvas dieser Form zugreifen und im Notfall gibt es noch das
Self.
Zitat:
das Problem befindet sich bei //links dort treten die Fehler
* Wie wäre es mit einer Fehlerberscheibeung?
Meine
funktioniert nicht immer.
Aber...
- Ein Y mit Accent (Ý) scheint wohl nicht richtig zu sein.
- Mehrere Befehle gruppiert man mit BEGIN und END. (nicht über AND und Klammern)
Tipps:
* Prüfe nochmal deine Berechnung. Ich vermute hier
Delphi-Quellcode:
JagdX:=random(40)+1;
JagdY:=random(40)+1;
möchtest du eigentlich etwas anderes berechnen.
(den Random-Wert
zum alten Wert dazurechnen und nich komplett überschreiben)
* Ich denke irgendwann wird dir auffallen, daß sich der Mann und das Jagd aus dem Bild rausbewegen können.
Mit einer Prüfung und Behandlung der Form-Begrenzung sollte sich daran was ändern lassen.