根据源码例子,用这个生成出来的DetailControl
procedure TForm.Item1ActivateDetail(Sender: TdxTileControlItem);
if Sender.DetailOptions.DetailControl = nil then
begin
  Sender.DetailOptions.DetailControl := tForm1.Create(Self);
  Sender.DetailOptions.DetailControl.Name := Sender.Name + 'DetailControl';
end;
请问该如何调用Form1 里的过程和函数?像以前那样先引用单元再调用会出错。
TdxTileControlItem