ClassName (cursor)
property Where:string;
Propriété en lecture / écriture.
Cette propriété détermine le nom de la classe sur laquelle porte le curseur renvoyés.
Exemple :
Il peut être utile de définir dynamiquement la classe du curseur lorsque celui-ci est utilisé comme un attribut. Dans cet exemple il existe un attribut fCurseur défini sur la classe MyClass et dont la classe est déterminé à l'exécution.
procedure MyClass.Open(iMode:TEnumeratorMode);
begin
fCursor.ClassName := 'ClassC';
fIndex := -1;
end;