SameText (rtl)
De Wiki1000
(Différences entre les versions)
| Ligne 1 : | Ligne 1 : | ||
| − | |||
<source lang='delphi'>Function SameText(const S1:string; const S2:string):Boolean;</source> | <source lang='delphi'>Function SameText(const S1:string; const S2:string):Boolean;</source> | ||
| − | + | Cette fonction teste si deux chaînes sont égales sans tenir compte des différences minuscules/majuscules. | |
{|class="wikitable" | {|class="wikitable" | ||
|- | |- | ||
|Result | |Result | ||
| − | | | + | |True si les deux chaînes sont égales. |
|- | |- | ||
|S1 | |S1 | ||
| − | | | + | |Première chaîne. |
|- | |- | ||
|S2 | |S2 | ||
| − | | | + | |Seconde chaîne. |
| − | + | ||
| − | + | ||
| − | + | ||
|} | |} | ||
| Ligne 23 : | Ligne 19 : | ||
<source lang='delphi'> | <source lang='delphi'> | ||
begin | begin | ||
| + | if SameText('foo','Foo') then | ||
| + | begin | ||
| + | ... | ||
| + | end; | ||
end; | end; | ||
</source> | </source> | ||
Version actuelle en date du 11 août 2009 à 14:42
Function SameText(const S1:string; const S2:string):Boolean;
Cette fonction teste si deux chaînes sont égales sans tenir compte des différences minuscules/majuscules.
| Result | True si les deux chaînes sont égales. |
| S1 | Première chaîne. |
| S2 | Seconde chaîne. |
Exemple
begin if SameText('foo','Foo') then begin ... end; end;
Voir aussi:
