FindClass (MM)

De Wiki1000
(Différences entre les versions)
Syfre (discuter | contributions)
(Nouvelle page : <source lang='delphi'>function FindClass(const iName:string; iExtension:boolean):TPackageInfo;</source> Cette fonction recherche une classe dans le modèle métier. {|class="wikita...)
Modification suivante →

Version du 6 novembre 2009 à 12:34

function FindClass(const iName:string; iExtension:boolean):TPackageInfo;

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

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;

Voir aussi

ModelManager_(code)Développement DSM





Whos here now:   Members 0   Guests 0   Bots & Crawlers 1
 
Outils personnels