Forum: Programmieren allgemein
Delphi
by Matze33,
9. Dez 2010
Jo, hab ich auch das Gefühl. Also nehm ich dazu mal Stellung: Es ist einfacher immer Image zu schreiben, als Image_Mario_guckt_nach_links oder sowas, auch wenns jetzt übertrieben ist. Abgesehen davon ist es ja eigentlich auch nur für mich. Außerdem spielt das ja für meine eigentliche Rolle gar keine Frage. Deshalb auch die Bitte, jetzt wieder zum Problem zurück zu kommen^^
Forum: Programmieren allgemein
Delphi
by Matze33,
9. Dez 2010
Wo liegt denn bitte an "Wiederholungen" das Problem?...
Forum: Programmieren allgemein
Delphi
by Matze33,
8. Dez 2010
Doch klar. Image1.Top+Image1.Height ist ja dann praktisch das untere Ende vom Bild. Und Panel1.Top ist halt das obere vom Panel xD
Wenn ich also springe sinkt der Wert von Image1.Top+Image1.Height auf eine Größe, die über Panel1.Top liegt, liegt aber zwischndurch genau auf der Höhe.
Image1.Top:=372
Image1.Height:=43
Image1.Top+Image1.Height:=415
Panel1.Top:=375
Sprung: 14*5px=70px...
Forum: Programmieren allgemein
Delphi
by Matze33,
8. Dez 2010
Japp, hab ich noch mal Glück gehabt, bevor ich wieder noch blöder dagestanden hätte^^
Wie dem auch sei, hab jetzt wieder eine Stelle, wo ich nicht weiter komme.
procedure TForm1.Timer1Timer(Sender: TObject);
begin
wiederholungen:=wiederholungen+1;
if Image1.Visible=True Then
begin
Forum: Programmieren allgemein
Delphi
by Matze33,
8. Dez 2010
Äh ja, natürlich. War eben nur hingeschmiert^^
Auf jeden Fall danke dafür. Jetzt setz ich mich mal weiter hin, und gucke, wieso es noch nicht geht :P (Also der beabsichtigte Effekt). Sollte ich es nicht hinkriegen (wovon ich nicht ausgehe), melde ich mich wieder xD
Edit: Kann ich ein and auch nach Then verwenden?
Edit2: Hat sich schon erledigt, man bin ich blöd :D
Forum: Programmieren allgemein
Delphi
by Matze33,
8. Dez 2010
Hey, hab mal ne "Anfängerfrage".
Ich möchte abfragen, ob sich ein Bild (das ich bewege, Konzept: Jump&Run-Game) über einem Panel befindet nach einem Sprung, damit es dann auf dem Panel landen kann und nicht wieder auf den Boden geht.
Eigentlich hätte ich dann jetzt das so geschrieben:
If Image1.Left>=Panel1.Left and Image1.Left<=Panel1.Left+Panel1.Width
Then...
