public TProfInstance CreateInstance(string AName, string AFileName)
{
TProfFunc Func;
TProfInstance Inst;
Func = FindFunc(AName);
if (Func == null)
{
Func = new TProfFunc(this, AName, AFileName);
this.Funcs.Add(Func);
this.Map.Add(Func.Name, Func);
}
Inst = Func.AddInstance();
return(Inst);
}