Le jeu de labyrinthe fun et gratuit - Retour au site
9
Hors-ligne
9
Hors-ligne
14
LeSwitch.IsOn := True; // True = On ; False = Off
Hors-ligne
9
! (http://www.funlabyrinthe.com/forum/topic/75/ [funlabyrinthe.com] )
.
Modifié intello (mars 19, 2012 17:52:07)
Hors-ligne
9
Hors-ligne
14
intelloAh c'est ça que tu veux ? Alors en fait ça c'est faisable et assez facile. C'est juste qu'il faut préparer la liste en Delphi, mais c'est assez minimal.
Et donc, pour que cela soit plus simple d'utilisation, je me disais qu'il fallait mieux que l'utilisateur choisisse “Rond” comme style du composents “table” dans une propriété liste de texte (ce que je demande) plutôt que de l'écrire en lettres (property string) avec une chance sur deux de l'oublier dès le lendemain .
unit TableKinds;
interface
type
TTableKind = (tkRond, tkCarre, tkTriangle);
implementation
end.
property Kind: TTableKind;
Hors-ligne
14
intello
Tant que j'y suis . Comment on règle l'alpha d'une TColor32 à 255 dans on afterconstruction do ??
SomeColor := SetAlpha(SomeColor, 100);
Hors-ligne
9

Hors-ligne
9
sjrd
Pour l'interrupteur :
LeSwitch.IsOn := True; // True = On ; False = Off
.
Hors-ligne
14
LeSwitch.SwitchOn(Context);
Hors-ligne