Mangled name

@Evalmod@TEvalDialog@SetThreadObj$qqrp14System@TObject