FindClass (MM)

<source lang='delphi'>function FindClass(const iName:string; iExtension:boolean):TRegclassInfo;</source>

Cette fonction recherche une classe dans le modèle métier.

Result	Un objet réprésentant la classe.
iName	Le nom de la classe dans le modèle.
iExtension	Si true recherche aussi une extension.

Exemple <source lang='delphi'> var s,stag:string; idx:Integer; rg:TRegClassInfo; begin

 rg := ModelManager.FindClass('WFClasseA',false);
 if Assigned(rg) then
  begin
    s := ; stag := ;
    for idx :=0 to rg.AttributeCount-1 do
    if rg.Attributes[idx].isRoleDatatype then
     begin
       s := s+stag+rg.Attributes[idx].name;
       stag := ',';
     end;
    showMessage('Rôles de la classe WFClasseA:'+s);
  end

end; </source>

Voir aussi

• Classe métier.

{{#if:ModelManager_(code)|

{{#if:ModelManager_(code)|— ModelManager_(code) |}} — Développement DSM —

|

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

}}