TbeCustomControlSkin
TbeCustomControlSkin
Diese Klasse ist eine Eigenschaft ("Skin") von bestimmten grafischen Controls. Sie dient zum Ändern des Aussehens der einzelne Komponente.
Funktionen und Methoden
Funktion / Methode | Parameter | Beschreibung |
---|---|---|
CbIncludeAssignedValue(aValue:N) Aktiviert die benutzerdefinierte Einstellung. | aValue:N | // Allgemein csvTextSize, csvTextColor, csvTextAccent, csvTextColorMode, // Edit-Controls haben noch zusätzlich: csvBackgroundColor, csvBackgroundAccent, csvBorder, csvBorderColor, csvBorderAccent, csvBorderSize, // Label-Controls haben noch zusätzlich: csvTextStyle |
CbExcludeAssignedValue(aValue:N) Setzt die gewünschte Eigenschaft zurück auf den default-Wert. | aValue:N | // Allgemein csvTextSize, csvTextColor, csvTextAccent, csvTextColorMode, // Edit-Controls haben noch zusätzlich: csvBackgroundColor, csvBackgroundAccent, csvBorder, csvBorderColor, csvBorderAccent, csvBorderSize, // Label-Controls haben noch zusätzlich: csvTextStyle |
CbResetDefaults() Setzt das Default-Style der Komponente zurück - die AssignedValues werden geleert. | keine | |
CbBeginUpdate() Verhindert neues Zeichnen der Komponente bei Änderungen von Skin-Eigenschaften. | keine | |
CbEndUpdate() Erlaubt neues Zeichnen der Komponente bei Änderungen von Skin-Eigenschaften und zeichnet die Komponente neu. | keine |
Beispiel
|
bool,
// <at:var at:name="VDB" /> Der nachfolgende Teil wird automatisch gepflegt.
oForm, A_HelpContent, beButton1, calc
// <at:var at:name="VDE" /> Der vorangehende Teil wird automatisch gepflegt.
|
//******************************************************************************
//
//******************************************************************************
function beButton1Click( Sender )
bool := not bool,
calc.skin.cbBeginUpdate(),
startseq
if bool then
calc.skin.colorMode := cscmWarning,
else
calc.skin.cbexcludeAssignedValue(csvTextColorMode),
// calc.skin.cbresetdefaults(),
endif,
always
calc.skin.cbEndUpdate(),
stopseq,
end,
startseq
// <at:var at:name="VZB" /> Der nachfolgende Teil wird automatisch gepflegt.
oForm := LoadForm("@ASDA", Application),
A_HelpContent := FindObject(oForm, "A_HelpContent"),
beButton1 := FindObject(oForm, "beButton1"),
calc := FindObject(oForm, "calc"),
// <at:var at:name="VZE" /> Der vorangehende Teil wird automatisch gepflegt.
Show(oForm),
onerror
DestroyObject(oForm),
stopseq,