timer in quiz einbauen

nilz · Hält's aus hier Beiträge: 13

hab das problem, dass ich einen timer in ein wer wird millionär quiz einbauen soll, dass also die frage zB 20sec aufleuchtet und wenn er nicht antwortet is er raus

wie kann ich das miteinander verknüpfen bzw kann mir jmd anregungen geben

thx schonma

Xong · Beiträge: 113 WIN 2000 Borland Developer Studio 2006

Ich würde es genauso machen, wie du beschrieben hast.
Ehrlich gesagt sehe ich dein konkretes Problem noch nicht.
Wenn die zwanzig Sekunden um sind, versetzt du das Programm halt in den Modus "Schade, leider nicht gewusst! Hier ist die Auflösung!" und bietest dann einen Neustart des Spiels an und/oder verweist den/die Spieler auf´s Hauptmenü.

nilz · Hält's aus hier Beiträge: 13

mein problem ist, dass ich kaum grundlagen habe und daher nicht genau weiß wie ich den quelltext für den timer schreiben soll

Kroko · Beiträge: 1284 W98 W2k WXP Turbo D

nach dann schau doch mal hier vorbei!

_________________
Die F1-Taste steht nicht unter Naturschutz und darf somit regelmäßig und oft benutzt werden! oder Wer lesen kann, ist klar im Vorteil!

oldmax · Beiträge: 380 D3 Prof, D4 Prof

Hi
Dein Manko an Grundlagen beseitigst du über lesen von Tutorials, der Hilfe oder F1 (Objekt - Ausdruck anklicken und dann F1) und dann lesen.
Wenn du dich in der Schule für Informatik einträgst, ist das nicht "cool", sondern anstrengend.
Du wirst gelernt haben, das Delphi ein ereignis-gesteuertes Programm ist und alle Objekte Ereignisse unterschiedlichster Art erzeugen. Was möglich ist, sagt dir z.B. der Objektinspektor oder auch die Hilfe (F1-Taste,Hilfe -Index etc.) Manchmal sind auch Beispiele dabei.
Der Timer ( Objekt TTimer )ist ein Objekt, welches selbstständig in Intervallen ein Ereignis auslöst. In diese Ereignis-Procedure kannst du nun deinen Code schreiben oder eigene Proceduren aufrufen.
Gruß oldmax

_________________
Zier dich nich so, ich krieg dich schon....

Yogu · Verfasst: Fr 22.02.08 16:57

nilz hat folgendes geschrieben:

mein problem ist, dass ich kaum grundlagen habe

Chrashkurs Delphi von user profile icon

Christian S.

Gintonik · Beiträge: 66 Win MCE 2005 Delphi7 Enterpr.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:

procedure TForm1.Button1Click(Sender: TObject);   //* Button für nächste Frage *
begin
zeigefrage(xy);   //* PROZEDUR UM DIE FRAGE Nr. XY AUFZURUFEN*
timer1.Enabled := true //* Timer einschalten (aktiviert)*
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin

if answer(xy,z) = false then
 begin
   timer1.Enabled := false //* Timer schaltet sich nach 20 s selber aus (deaktiviert)*
   gameover //*Prozedur um das Spiel zu beenden*
 else
  begin
   zeigefrage(xy);
   timer1.Enabled := false  //* timer für nächste Runde stoppen *
  end;
end;

Die Prozedur zeigefrage startet die nächste Frage, danach wird der Timer den du auf 20s eingestellt hast, gestartet.
Kommt keine oder eine falsche Antwort wird er nach 20s deaktiviert und die Prozedur "Gameover" aufgerufen. Ist die Antwort richtig erscheint die nächste Frage und der Timer wird neu gestartet.

Die Pozedur zeigefrage(xy,z) musst du dir selbst entwerfern bzw. an dieser Stelle deinen eigenen Code einbringen.

_________________
Man sagt, er habe magische Kräfte!

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme