ToString (objectlist)
<source lang='delphi'>function ToString(iIndex:Integer; iCount:Integer; iPropName:string; iDoubleQuote:boolean):string</source>
Cette méthode retourne une chaîne liste de valeurs.
iIndex | Index de départ |
iCount | Nombre max a retourner |
iPropName | Nom de l'attribut à sérialiser |
iDoubleQuote | Ajouter des quotes aux valeurs retourner |
Pseudo code équivalent:
<source lang="delphi">
function ToString(iIndex:Integer; aCount:Integer; iPropName:string; iDoubleQuote:boolean; const iSep:String=','):String; var indx:Integer; AStr,stag:string; isOID:boolean; begin
isOID := SameText(iPropName,'oid') or SameText(iPropname,'InstanceOID'); // Result := ; stag := ; indx := iIndex; if ACount=-1 then ACount := Count; while (indx<Count) and (ACount>0) do begin if isOID then AStr := OIDs[indx] else AStr := SafeVarToStr(Refs[indx].GetPropAsVariant(iPropName));
if iDoubleQuote then AStr := Doublequote(AStr);
Result := Result+stag+AStr; stag := iSep; Inc(indx); dec(ACount); end;
end;
</source>
Voir aussi:
{{#if:Listes d'objets (tech)|
{{#if:Listes d'objets (tech)|— Listes d'objets (tech) |}} — Développement DSM —
|
{{#if:|— [[{{{1}}}]] |}} — Développement DSM —
}}