Inhaltsverzeichnis

TTimer — Zeitgeber

Ruft in festem Abstand einen Handler. Kein Steuerelement — ein Zeitgeber zeichnet nie und hängt darum direkt an TComponent, nicht an TControl. Der Weg für alles, was regelmäßig passieren soll — Animation, Statusaktualisierung, blinkende Schreibmarke.

Unit: Vega.Forms · Basis: TComponent

Alle Steuerelemente · Guide: Komponenten


Verwendung

var t: TTimer := NewTimer(20);      // alle 20 ms
t.OnTimer := OnTick;
t.Start();
g_app.AddTimer(t);                  // OHNE dies feuert er nie

fn OnTick(sender: TControl): void {
    g_wert := g_wert + 1;
    g_anzeige.SetCaption(IntToStr(g_wert));
}

t.Stop();                           // anhalten
t.IntervalMs := 500;                // Abstand aendern
t.Start();


Besonderheiten


Eigenschaften

Alle Eigenschaften, auch die geerbten.

Name Typ Bedeutung Herkunft
IntervalMs int64 Abstand in Millisekunden eigen
Enabled bool Nimmt Eingaben an eigen
NextDue int64 Wann der Zeitgeber wieder dran ist eigen
Owner TComponent Wer diese Komponente wegräumt — nicht das Elternteil im Zeichenbaum TComponent
OwnedComponents TObjectList Die Komponenten, die dieser gehören (Delphis Components[]) TComponent
Name pchar Name der Komponente, für FindComponent und Formulardateien TComponent
Tag int64 Freier Wert für die Anwendung TComponent
ComponentState int64 Zustand als Bitmaske: csLoading, csDestroying, csDesigning TComponent
ComponentStyle int64 Stil als Bitmaske; Vorgabe csInheritable TComponent

Methoden

Alle Methoden, auch die geerbten.

Signatur Zweck Herkunft
Create(interval_ms: int64): void Anlegen; NewTimer(20) eigen
Start(): void Zeitgeber einschalten eigen
Stop(): void Zeitgeber ausschalten eigen
NextDueIn(now: int64): int64 Wie lange die Schleife höchstens schlafen darf, bis diese Komponente wieder dran ist; -1 = nie von selbst eigen
Tick(now: int64): bool Wird von der Anwendung gerufen eigen
InitComponent(): void Grundzustand herstellen — von jeder Ableitung im Create zu rufen, da Lyx Konstruktoren nicht vererbt TComponent
Destroy(): void Gibt eigene Ressourcen frei TComponent
ComponentCount(): int64 Anzahl der eigenen Komponenten TComponent
Components(index: int64): TComponent Eigene Komponente an dieser Stelle TComponent
ComponentIndex(): int64 Eigener Platz in der Liste des Besitzers, -1 ohne Besitzer TComponent
InsertComponent(c: TComponent): void Komponente in Besitz nehmen; ein bisheriger Besitzer gibt sie ab TComponent
RemoveComponent(c: TComponent): void Komponente aus dem Besitz nehmen TComponent
FindComponent(name: pchar): TComponent Eigene Komponente über ihren Name suchen — eine Ebene tief TComponent
DestroyComponents(): void Alle Besitztümer abbauen, von hinten nach vorn TComponent
SetName(v: pchar): void Namen setzen TComponent
GetName(): pchar Namen lesen TComponent
SetTag(v: int64): void Tag setzen TComponent
GetTag(): int64 Tag lesen TComponent
HasState(bits: int64): bool Sind diese Zustandsbits gesetzt TComponent
SetState(bits: int64): void Zustandsbits setzen TComponent
ClearState(bits: int64): void Zustandsbits löschen TComponent
HasParent(): bool Hängt die Komponente in einem Baum TComponent
GetParentComponent(): TComponent Übergeordnete Komponente im Baum TComponent
GetNamePath(): pchar Voller Name für Formulardateien; in Vega der Name selbst TComponent

Ereignisse

Name Typ Wann Herkunft
OnTimer TTimerEvent Der Zeitgeber ist fällig eigen

Letzte Aktualisierung: 2026-08-19 — API maschinell aus Vega/Forms.lyx erhoben, Beispiel mit lyxc 1.1.3I übersetzt.