create (tvirtualpersistent)

create (tdialogcontroller)

create (trealdialogcontroller)

destroy (tlinkedpersistent)

setlinkedvar (tlinkedpersistent)