FindPackage (MM)

De Wiki1000
function FindPackage(const iName:string):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