Mehrfache Timer-Events

Hallo @Torben,

wäre es möglich, der Prozedur OnTimer (aus Kompatibilitätsgründen: optional) noch einen Namen zuzuordnen, damit man gegebenenfalls mehrere verschiedene Timer-Events parallel laufen lassen könnte?

Hintergrund: Ich finde meine Enable-Taste ganz klasse. Wenn aber gleichzeitig z. B. auch noch etwas blinken soll, dann kommt alles durcheinander. Oder sehe ich das falsch?

Mehrfache Grüße

TSD

Eingebaut in Snapshot 4112. Dort gibt es neben dem alten EnableTimer/DisableTimer nun auch ein Variante EnableTimerEx/DisableTimerEx, bei der man zusätzlich eine ID übergeben kann. Damit lassen sich dann mehrere Timer gleichzeitig definieren.

EnableTimerEx('bla', 1000);
EnableTimerEx('blup', 2000);

Für die Verarbeitung verwendet man dann die neue Funktion OnTimerEx:

procedure OnTimerEx(ID: string);
begin
  if ID = 'bla' then begin
    // ...
  end
  else if ID = 'blup' then begin
    // ...
  end;
end;

Das alte OnTimer existiert weiterhin und funktioniert wie gewohnt.

1 Like

Großartig! Vielen Dank!!

Mehrfache Grüße

TSD