【结帖】主窗体如何获得子窗体的返回值？**

qiezi

如标题

qiezi

请教！

zfang

主窗体调用子窗体如下
var
  lfrm : TZCT;//子窗体
a : string;
begin
  lfrm := TZCT.Create(context);
  try
    if lfrm.ModalResult = mrok then //引用空间看帮助
        a := lfrm.edit1.text;//这里就是子窗体的结果返回给主窗体的变量
  finally
     lfrm.free;
  end;
end;
==========================
以上仅供参考。

qiezi

应该是在子窗体中访问道到主窗体。在子窗体的事件中返回值。

zfang

老大，那还不是一样的么？
2楼的代码里你改一下就可以了阿。
lfrm := TZCT.Create(context);
  try  
    lfrm.edit.text := '123232';//这里就是给子窗体的赋值。

    if lfrm.ModalResult = mrok then //引用空间看帮助

zfang

还有，楼主可以用业务参数来进行传参数值的方式。
请楼主查查相关帮助。

zfang

反馈下问题。

qiezi

问题已解决，在窗体中public中定义了变量传参数，谢谢！结贴！