GetCounterByName (rtl)
De Wiki1000
(Différences entre les versions)
| Ligne 1 : | Ligne 1 : | ||
<source lang='delphi'>Function GetCounterByName(Inst:TitObject; const iName:String):TdbfCounter;</source> | <source lang='delphi'>Function GetCounterByName(Inst:TitObject; const iName:String):TdbfCounter;</source> | ||
| − | Cette fonction retrouve un objet compteur. | + | Cette fonction retrouve un [[TdbfCounter (class)|objet compteur]]. |
{|class="wikitable" | {|class="wikitable" | ||
| Ligne 45 : | Ligne 45 : | ||
Voir aussi: | Voir aussi: | ||
| + | |||
| + | *[[TdbfCounter (class)|Classe des compteurs]] | ||
{{Footer|Développement DSM}} | {{Footer|Développement DSM}} | ||
[[category:RTL Framework]] | [[category:RTL Framework]] | ||
Version actuelle en date du 15 août 2009 à 09:37
Function GetCounterByName(Inst:TitObject; const iName:String):TdbfCounter;
Cette fonction retrouve un objet compteur.
| Result | L'instance de l'objet compteur de nom recherché. |
| Inst | Instance d'objet utilisée pour identifier la base de données. |
| iName | Nom du compteur. |
Le paramètre instance est utilisé pour identifié la base de données ou effectuer la recherche ; à défaut (valeur nil) la base de données par défaut est utilisée.
Exemple
{TGroupeRemiseBancaire.ValeurInitiale_Compteur} var vCompteur : TdbfCounter; vNameCompteur : String; begin Result := FALSE; vNameCompteur := ''; if (TypeRemiseBancaire.Value = TypeRemiseBancaire_Virement) then vNameCompteur := 'GroupeRemise_Virement' else if (TypeRemiseBancaire.Value = TypeRemiseBancaire_Prelevement) then vNameCompteur := 'GroupeRemise_Prelevement' else if (TypeRemiseBancaire.Value = TypeRemiseBancaire_LCRBOR) then vNameCompteur := 'GroupeRemise_LCRBOR' else if (TypeRemiseBancaire.Value = TypeRemiseBancaire_TransfertInternational) then vNameCompteur := 'GroupeRemise_Transfert'; if (vNameCompteur <> '') then begin vCompteur := GetCounterByName(self,vNameCompteur); Compteur.Counter := vCompteur; end; end;
Voir aussi:
