FindPackage (MM)
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