FindNext (role)
function FindNext(const iExpression:string; iArgs:Array of variant; iFromIndex:Integer):Integer;
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
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;
Voir aussi