AsCursor (selector)
function AsCursor:TCursor;
Cette fonction retourne un curseur d'objets représentant la sélection.
| Result | Un curseur d'objets représentant la sélection. |
Exemple
var sel:TSelector; S:string; stag:string; inst:WFClasseA;
begin
sel := WFClasseA.CreateSelector('','',true,[]);
S := ''; stag := '';
foreach inst in sel.AsCursor do
begin
S := S+stag+inst.unCode;
stag := ',';
end;
ShowMessage(S);
end;
Voir aussi :