FindPackage (MM)

De Wiki1000
Version du 6 novembre 2009 à 11:32 par Syfre (discuter | contributions)
(diff) ← Version précédente | Voir la version courante (diff) | Version suivante → (diff)
function FindPackage(const iName):TPackageInfo;

Cette fonction recherche un paquet dans le modèle métier.

Result Un objet réprésentant le paquet.
iName Le nom du paquet dans le modèle.

Exemple

var s,stag:string; idx:Integer; pk:TPackageInfo; 
begin
  pk := ModelManager.FindPackage('TestSYFREWF');
  if Assigned(pk) then
   begin
     s := ''; stag := '';
     for idx :=0 to pk.ClassCount-1 do
      begin
        s := s+stag+pk.Classes[idx].Name;
        stag := ',';
      end;
     showMessage('Liste des classes de TestSYFREWF:'+s);
   end;
end;

Voir aussi

ModelManager_(code)Développement DSM

Outils personnels