« FindNext (role) » : différence entre les versions

De Wiki1000
Aucun résumé des modifications
Aucun résumé des modifications
 
Ligne 23 : Ligne 23 :
<source lang='delphi'>
<source lang='delphi'>


function doFindNext(const ACaption,BCode:string;iFrom:Integer):Boolean;
function doFindNext(const ACaption,BCode:string):Boolean;
var instA:ClassA; indx:Integer;
var instA:ClassA; indx:Integer;
begin
begin

Dernière version du 21 septembre 2012 à 14:23

<source lang='delphi'>function FindNext(const iExpression:string; iArgs:Array of variant; iFromIndex:Integer):Integer;</source>

Cette fonction retourne l'index de l'objet suivant vérifiant une expression logique

Result Index du premier objet retrouvé
iExpression Expression logique
iArgs Argument de l'expression
iFromIndex Index de début de recherche
Note : Cette fonction provoque le chargement du rôle si celui-ci n'est pas chargé.

Exemple <source lang='delphi'>

function doFindNext(const ACaption,BCode:string):Boolean; var instA:ClassA; indx:Integer; begin

 instA := ClassA.Find('Caption=%1',,true,[ACaption]);
 Result := Assigned(instA);
 if not Result then Exit;
 indx := instA.listB.FindFirst(unCodeB=%1,[BCode]);
 Result := indx<>-1;
 if not Result then Exit;
 indx := instA.listB.FindNext(unCodeB=%1,[BCode],indx);
 Result := indx=-1;

end;

</source>

Voir aussi

{{#if:Rôles (tech)|

{{#if:Rôles (tech)|— Rôles (tech) |}} — Développement DSM

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM

}}