如何将弹出新窗体得到的信息传回到调用处？**

aqmeng

如何将弹出新窗体得到的信息传回到调用处？
谢谢回复！

lisb

通过弹出窗体的实例就能得到窗体下的任何东西了。

aqmeng

我的意思是：在一个窗体中弹出新窗台，将新窗体的内容传回到原窗体的调用处，关键问题是新窗体内容传回的调用的位置！

atiger

怎么理解“将新窗体的内容传回到原窗体的调用处，关键问题是新窗体内容传回的调用的位置！”这句话，啥叫原窗体的调用处，啥叫调用位置？

lixy

看你代码怎么写了，具体情况具体分析

atiger

??

alang

你看看是找这个吗？
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
10.        主子窗体传递数据
    利用数据集来传递数据***
    主调用子窗体的数据
    子调用主窗体的数据
    在子窗体中定义一个变量zct: TZCT;然后通过这个变量来访问主窗体
  Memo1.Lines.Text := zct.Memo1.Lines.Text;
在创建子窗体时，主窗体主动对这个变量赋值
  z := TZICT.Create(Self.Context);
  try
    z.zct := Self;
    if z.ShowModal=Business.Forms.Controls.mrOk then
      Memo1.Lines.Add(z.Edit1.Text)
  finally
    z.Free;
  end;