tlinkedpersistent

destroy

setlinkedvar

tnullinterfacedpersistent

tvirtualpersistent

create