Source position: mclasses.pas line 1151
procedure RegisterClassAlias(
AClass: TPersistentClass;
const Alias: string
);