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