Entwickler-Ecke
Sonstiges (Delphi) - Bilderlaufen von oben nach unten
itsme - Sa 23.04.05 20:39
Titel: Bilderlaufen von oben nach unten
Hallo,
ich habe zwei images. eines soll nach unten laufen, dann das nächste was daneben liegt wenn das erste image unten durchgelaufen ist soll dann nachlaufen.
ich brauche den code dafür, bin anfänger und hab null ahnung. das ganze soll mit einem timer bewerkstelligt werden.
liebe grüße
itsme
delfiphan - Sa 23.04.05 20:56
Timer, Image1.Top := Image1.Top + 1, und einige if-Bedingungen und du hast das Programm zusammen. Wenn du Anfänger bist, solltest du dich aber zuerst in die Grundlagen einarbeiten.
Falls du willst, dass jemand ein fertiges Programm für dich schreibt, kannst du dein Glück auch in der Job-Börse versuchen.
Wie es aussieht, handelt es sich um Hausaufgaben...
itsme - Sa 23.04.05 20:57
Titel: nee
hausaufgaben nicht, aber vorbereitung auf die klausur. die nebenklasse hat mit bildern einen fahrstuhl gemacht... wir sollen uns damit mal vertraut machen
itsme - Sa 23.04.05 21:00
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
| procedure TForm1.Timer1Timer(Sender: TObject);
begin
if image1.top < form1.width then
begin
form1.color := clWhite;
image1.left := image1.top + 90
end
else
begin
form1.color := clBlack;
image2.left := image2.top + 90
end
end;
end. |
funktioniert nicht
Moderiert von 
Christian S.: Delphi-Tags hinzugefügt.
delfiphan - Sa 23.04.05 21:08
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
| procedure TForm1.Timer1Timer(Sender: TObject);
const
dx = 90;
dy = 90;
begin
if Shape1.Top < ClientHeight-Shape1.Height-dy then
Shape1.Top := Shape1.Top + dy else
if Shape2.Left < ClientWidth-Shape2.Width-dx then
Shape2.Left := Shape2.Left + dx
end; |
Ach ja, ich hab Shapes benützt, kannst es ja umbenennen...
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!