Entwickler-Ecke :: Thema anzeigen - Shapes verdecken mit Image und Timerfunktion

Waldkauz - So 28.06.09 21:20
Titel: Shapes verdecken mit Image und Timerfunktion

Hallo

Also, Image6 verdeckt bei mir 5 Shapes.
Wenn der Timer eingeschaltet wird, soll Image6 für 3 Sekunden unsichtbar werden, und somit sollen die Shapes sichtbar sein.
Das Problem ist, dass zwar Image6 unsichtbar wird, aber unsichtbar bleibt.

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

procedure TForm6.Timer1Timer(Sender: TObject);
var t:integer;
begin
 t:=3;
 t:=t-1;
 Image6.Visible:=false;
 if t=0 then begin
  Image6.visible:=true;
  Timer1.Enabled:=false; 
 end;

end;

jaenicke - So 28.06.09 21:27

Also erstens ist beim nächsten Durchlauf des Timers der Wert von t nicht mehr vorhanden, falls das nicht klar ist. (Aber du setzt ihn ja ohnehin jedesmal.)

Waldkauz hat folgendes geschrieben :

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

 t:=3;
 t:=t-1;
 Image6.Visible:=false;
 if t=0 then begin
  Image6.visible:=true;
  Timer1.Enabled:=false; 
 end;

So, dann schauen wir doch einmal was du da machst... :roll:
Du weist t den Wert 3 zu.
Du ziehst 1 ab, danach ist der Wert immer 2.
Jetzt blendest du das Image aus. Immer.

Und jetzt schaust du, ob t = 0 ist. Wie soll es das an der Stelle aber sein? 3 - 1 ist nie 0, oder siehst du das anders? ;-)

Waldkauz - So 28.06.09 21:30

Ich würd mich jetzt am liebsten in eine Ecke stellen und mich schämen :oops: ...
Aber wenn man 6000 Zeilen Quellcode hinter sich hat, darf man einem das nicht übel nehmen

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!