ParseString (rtl)
De Wiki1000
(Différences entre les versions)
Ligne 1 : | Ligne 1 : | ||
− | |||
<source lang='delphi'>Function ParseString(const s:string; sep:char; oList:TStrings):Integer;</source> | <source lang='delphi'>Function ParseString(const s:string; sep:char; oList:TStrings):Integer;</source> | ||
− | + | Cette fonction décompose une chaîne contenant des sous chaînes sépararées par un caractère séparateur. | |
{|class="wikitable" | {|class="wikitable" | ||
|- | |- | ||
|Result | |Result | ||
− | | | + | |Le nombre de sous chaînes. |
|- | |- | ||
|s | |s | ||
− | | | + | |La chaîne à décomposer. |
|- | |- | ||
|sep | |sep | ||
− | | | + | |Le caractère séparateur de sous chaînes. |
|- | |- | ||
|oList | |oList | ||
− | | | + | |La liste recevant les sous chaînes. |
− | + | ||
− | + | ||
− | + | ||
|} | |} | ||
Ligne 25 : | Ligne 21 : | ||
<source lang='delphi'> | <source lang='delphi'> | ||
+ | procedure foo(const s:string); | ||
+ | var ls:TStringList; ss:string; | ||
begin | begin | ||
+ | // s = s1,s2,s3.... | ||
+ | ls := TStringList.Create; | ||
+ | Parsestring(s,',',ls); | ||
+ | foreach ss in ls do | ||
+ | begin | ||
+ | ... | ||
+ | end; | ||
end; | end; | ||
</source> | </source> | ||
Voir aussi: | Voir aussi: | ||
+ | |||
+ | *[[StringPart (rtl)|StringPart]] | ||
{{Footer|Développement DSM}} | {{Footer|Développement DSM}} | ||
[[category:RTL Chaîne]] | [[category:RTL Chaîne]] |
Version actuelle en date du 11 août 2009 à 14:32
Function ParseString(const s:string; sep:char; oList:TStrings):Integer;
Cette fonction décompose une chaîne contenant des sous chaînes sépararées par un caractère séparateur.
Result | Le nombre de sous chaînes. |
s | La chaîne à décomposer. |
sep | Le caractère séparateur de sous chaînes. |
oList | La liste recevant les sous chaînes. |
Exemple
procedure foo(const s:string); var ls:TStringList; ss:string; begin // s = s1,s2,s3.... ls := TStringList.Create; Parsestring(s,',',ls); foreach ss in ls do begin ... end; end;
Voir aussi: