Thema: Delphi Quiz mit Stoppuhr

Einzelnen Beitrag anzeigen

Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#10

Re: Quiz mit Stoppuhr

  Alt 20. Mai 2006, 20:21
ne, aber umkekehrt geht es (Intervall 5000):

Delphi-Quellcode:
var Counter: Integer = 0; // global

// OnTimer:
// ========
begin
  inc(Counter);
  // dieser Block wird alle 5 Sek ausgeführt

  if Counter = 2 then // 2 * 5000 => 10 s
  begin
    Counter := 0;
    // dieser Block wird alle 10 Sek ausgeführt.

  end;
end;
  Mit Zitat antworten Zitat