Inhaltsverzeichnis

TCoolBar — Bänder gleicher Höhe

Eine TControlBar, deren Bänder auf eine gemeinsame Höhe gezwungen werden — Delphis Bands[].FixedSize. Sonst identisch: Griffe, Ziehen, OnBandMove.

Unit: vega.layoutctrls · Basis: TControlBar

→ Alle Steuerelemente · Klassenbaum · Guide: Komponenten

Vererbung

Kette: TComponent → TControl → TControlBar → TCoolBar

Direkte Nachfahren: keine — diese Klasse wird nicht weiter abgeleitet.

Quelle: vega/layoutctrls.lyx

Verwendung

var cool: TCoolBar := new TCoolBar();
cool.SetAlign(AL_TOP);
cool.SetFixedSize(true);
cool.SetBandHeight(28);        // gilt dann fuer alle Baender
cool.SetParent(f);

Besonderheiten

Eigenschaften

Alle Eigenschaften, auch die geerbten.

Name Typ Bedeutung Herkunft
ComponentState int64 Zustand als Bitmaske (csLoading, csDestroying …) TComponent
ComponentStyle int64 Stil als Bitmaske; Vorgabe csInheritable TComponent
Name pchar Name der Komponente — für FindComponent und beim Laden aus LFM TComponent
OwnedComponents TObjectList Die Komponenten, die DIESER gehoeren. Delphis Components[]. Zeigerliste, keine Kopien: TObjectList hält int64-Adressen TComponent
Owner TComponent Wer diese Komponente wegraeumt. Nicht der Elternteil im Zeichenbaum — das ist bei TControl `Parent` TComponent
Tag int64 Freier Wert für eigene Zwecke; die Bibliothek fasst ihn nicht an TComponent
BandBorders bool Baender mit Rahmen zeichnen TControlBar
BandSpacing int64 Abstand zwischen den Baendern TControlBar
Bands TControlBands Die Bänder dieser Fläche TControlBar
HandleWidth int64 Der Griff links, an dem gezogen wird TControlBar
BandHeight_ int64 Die Höhe, die dann gilt eigen
FixedSize bool Delphis Bands[].FixedSize: alle Baender gleich hoch eigen

Methoden

Alle Methoden, auch die geerbten.

Signatur Zweck Herkunft
ClearState(bits: int64): void Zustandsbits löschen TComponent
ComponentCount(): int64 Anzahl der eigenen Komponenten TComponent
ComponentIndex(): int64 Delphis ComponentIndex: der eigene Platz in der Liste des Besitzers TComponent
Components(index: int64): TComponent Eigene Komponente an dieser Stelle TComponent
Destroy(): void Raeumt die eigene Liste ab, aber NICHT die Einträge — welche Komponenten ihre Besitztuemer mitnehmen, entscheidet die Ableitung über DestroyComponents() TComponent
DestroyComponents(): void Baut die Besitztuemer ab. Von hinten, weil jedes Destroy() sich selbst aus der Liste austraegt TComponent
FindComponent(name: pchar): TComponent Sucht unter den EIGENEN Komponenten, eine Ebene tief — wie in Delphi TComponent
GetName(): pchar Namen lesen TComponent
GetNamePath(): pchar Der eigene Name. Delphi hängt bei Unterkomponenten den des Besitzers davor; Vega hat keine, also ist es der Name selbst TComponent
GetTag(): int64 Tag lesen TComponent
HasState(bits: int64): bool Sind diese Zustandsbits gesetzt TComponent
InitComponent(): void Kein Konstruktor: lyxc vererbt Konstruktoren nicht, jede Ableitung ruft InitComponent() im eigenen Create() 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
SetName(v: pchar): void Setzt Name TComponent
SetState(bits: int64): void Zustand setzen TComponent
SetTag(v: int64): void Setzt Tag TComponent
AddBand(c: TControl): TControlBand Ein Control als neues Band aufnehmen. Es wird zugleich Kind — sonst wuerde es nie gezeichnet TControlBar
ArrangeBands(): void Die Controls an ihre Plaetze setzen. Wie bei TToolBar vor jedem Zeichnen — ein Band, das dazukommt, aendert die Reihe, ohne dass sich die Größe des Behaelters aendert TControlBar
Band(i: int64): TControlBand Band Nummer i TControlBar
BandAtY(y: int64): int64 Welches Band liegt an dieser Höhe? -1, wenn keines TControlBar
BandCount(): int64 Zahl der Bänder TControlBar
BandTop(i: int64): int64 Oberkante eines Bandes TControlBar
Create(): void Anlegen; new TCoolBar() TControlBar
Destroy(): void Die Sammlung gibt die Baender selbst frei TControlBar
IndexOfControl(c: TControl): int64 Stelle eines Controls unter den Baendern, oder -1 TControlBar
MoveBand(von: int64, nach: int64): bool Ein Band an eine andere Stelle setzen — das ist, was der Nutzer beim Ziehen tut, und was ein Programm zum Wiederherstellen einer gespeicherten Anordnung braucht TControlBar
RequiredHeight(): int64 Wieviel Höhe alle Baender zusammen brauchen — für AutoSize TControlBar
Create(): void Anlegen; new TCoolBar() eigen
SetFixedSize(v: bool): void Setzt FixedSize eigen

Ereignisse

Name Typ Wann Herkunft
OnBandMove TNotifyEvent Ein Band wurde verschoben TControlBar

Letzte Aktualisierung: 2026-09-05 — Seite neu angelegt; erhoben aus vega/layoutctrls.lyx im Repo lyx-vcl.