Le jeu de labyrinthe fun et gratuit - Retour au site
 
							 
							
						 9
  9   
								
								Hors-ligne
 
							 
							
						 9
  9   
								
								Hors-ligne
 
							 
							
						 14
  14   
								
								LeSwitch.IsOn := True; // True = On ; False = Off
Hors-ligne
 
							 
							
						 9
  9   
								
								 ! (http://www.funlabyrinthe.com/forum/topic/75/ [funlabyrinthe.com]  )
 ! (http://www.funlabyrinthe.com/forum/topic/75/ [funlabyrinthe.com]  ) .
.
					
						
						Modifié intello (mars 19, 2012 17:52:07)
Hors-ligne
 
							 
							
						 9
  9   
								
								Hors-ligne
 
							 
							
						 14
  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
  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
  9   
								
								
Hors-ligne
 
							 
							
						 9
  9   
								
								sjrd
Pour l'interrupteur :
LeSwitch.IsOn := True; // True = On ; False = Off
.
Hors-ligne
 
							 
							
						 14
  14   
								
								LeSwitch.SwitchOn(Context);
Hors-ligne