Hiho ihr.
Ich habe ein frage.
Kann man in Delphi 2 If-Schleifen gleichzeitig laufen lassen in einer Procedur ?
Bei mir läuft immer erst eine ab. Wenn diese fertig ist, fängt die 2te an.
Aber in meinem Spiel müssen 2-4 IF-Schleifen gleichzeitig ablaufen.
Bitte um Hilfe !
Hier mein Code:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
| FOR i:=80 TO 700 DO BEGIN
Label6.top:=i;
if ((label6.top + label6.height >= image5.top) and
(label6.top <= image5.top+image5.height))
and ((label6.left+label6.width>=image5.left) and
(label6.left <= image5.left+image5.width))
then
label6.Destroy;
Delay(80);
end;
FOR i:=70 TO 700 DO BEGIN
Label7.top:=i;
if ((label7.top + label7.height >= image5.top) and
(label7.top <= image5.top+image5.height))
and ((label7.left+label7.width>=image5.left) and
(label7.left <= image5.left+image5.width))
then
label7.Destroy;
Delay(60);
end; |
Das sind 2 Labels, die von oben herunter fallen.
Aber beide Labels sollen gleichzeitig unterschiedlich schnell fallen.
Bitte verständlich schreiben bin ein Delphi anfänger
Vielan Dank im vorraus.
Moderiert von 
AXMD: Code- durch Delphi-Tags ersetzt.
gleich werden sich die geier hier auf die 
