Utilisez les tags des feuilles
Description
Utilisez les tags d'une feuille (Valeur entière) dans la programmation
dans un but de limitation du code
dans un but de limitation du code
Source / Exemple :
L’utilisation de tags dans les feuilles est rarement employé et pourtant ceux-ci
sont extrêmement importants lors de la programmation.
Le tag du bouton radio Fichiers est mis à 1. Ceux des autres boutons Radio sont respectivement à 2 et 3.
On crée un événement Onclick pour ces 3 boutons radio intitulé ( Le même pour les 3) - Dir.DefautClick(Sender:TObject);
La feuille où se trouve ses boutons s’appelle Form_Dir :
procedure TForm_Dir.DefautClick(Sender:TObject);
begin
Flag:=TRadioButton(Sender).Tag;Affiche.SimpleText:='';
end;
Ici on affecte à une variable globale Flag la valeur du tag de l’objet qui l’appelle.
(TRadioButton(Sender).Tag
On utilise la valeur du Flag trouvé dans une fonction
Function Nouveau(Anc:String):String;
Begin
Case Flag of
1:Nouveau:=UpperCase(Copy(Anc,1,1))+LowerCase(Copy(Anc,2,length(Anc)-1));
2:Nouveau:=UpperCase(Anc);3:Nouveau:=LowerCase(Anc);
Else Nouveau:=UpperCase(Copy(Anc,1,1))+LowerCase(Copy(Anc,2,length(Anc)-1));
End;
End;
{ Selon la valeur du Flag j’affecte à Nouveau la valeur Chaîne :
1 : Anc est écrit avec la 1ère lettre en Majuscules, le reste en Minuscules
2 : Anc est écrit tout an Majuscules
3 : Anc est écrit tout en Minuscules }
Codes Sources
A voir également
- Utilisez les tags des feuilles
- Comment relier des feuilles - Forum Visual Basic 6
- Gestion des droits d'accès des utilisateurs ✓ - Forum PHP
- Gestion des droits utilisateurs - Forum PHP
- Excel reporter des données sur une autre feuille vba ✓ - Forum Visual Basic
- [Vba] recopier la valeur d'une cellule dans une autre feuille. ✓ - Forum Visual Basic
Du même auteur (cs_Paounet)
-
Composant label3d toute version de delphi.
-
Composant grille avec nouvelles propriétés
-
Codes-sources du tutoriel password et get passord
-
Les codes du tutoriel sur la protection des logiciels par fichier et/ou par la base de registre via les composants créés tg
-
Composant tpassword composite générant un mot de passe et un code d'activation
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.