我设计了一主页界main窗口类型是fsmdiform,选择一个单位后打开一个fm_oper窗口类型是fsmdichild,现在我想在子窗口fm_oper中设计一个按钮,打开一个孙子窗口fm_choice,请并从这个窗口fm_choice中返回一部分数据到fm_oper中,请问如何设计这个窗口fm_choice的属性。以及按钮如何设计事件!谢谢

解决方案 »

  1.   

    在窗口fm_choice中设计如下一个公共函数以保证其它窗口可以引用:
    Function ShowThis(var ReturnStr:String):Boolean ;//返回值有两个:一个是返回
    //ReturnStr字符串,另一个是函数执行是否成功
    begin
      if Self.visible=false then
      begin
        self.showModel;//以模式窗口方式显示出本窗口
        ReturnStr:=Edit1.Text;
      end;
      Result:=True;
    end;//在窗口fm_Oper中可以如下调用:
    if fm_Choice.ShowThis(ReturnStr)=true then
    begin
    ..............
    end;