有没有一个什么类似全局变量的FORM的设置?

解决方案 »

  1.   

    你把Combox中的东西作为参数传过去不就得了。
      

  2.   

    在主程序中建一个相同的类(无实现部分),回调Dll的方法
      

  3.   

    不会吧,.....可以把这个LoadUserInf()写成你这个Form的一个方法,这样,就可以访问这个Form中的
    任何元件和方法啦。
      

  4.   

    >>也就是说如何在函数中操作另外一个函数中的建立的FORM?
    With Form1 do
    begin
      ....end;
      

  5.   

    请问BaldZhang(BaldZhang) 这个方法该如何写呢?
      

  6.   

    函数中操作另外一个函数操作的对象   在函数中必须能访问到该对象的指针方法:
    定义全局变量<可为函数所用>;将全局变量指针链向该函数创建的对象
    ExampleVar
      AForm:TMyForm1
      Function Somefunction:AForm;
      Function AFunctionUseAForm;
    somewhere
    ......
      AForm:=SomeFunction;
    ......
    Function AFunctionUseAForm;
    Begin
    ......
      DoSomething
      AForm.DoSomething
      DoSomething
    ......
    End;
      

  7.   

     大虾!
    你在第一个函数中已经把那个FORM FREE了!
      

  8.   

    不好意思!看错了!
    如果实在不行!可以找个中介!
    比如将 LoadUserInfo里的信息写入注册表!然后再从表里读出来放到COMBOX中!!
    这样就不用两个G函数互相访问了
      

  9.   

    将COMBOBOX的内容作为参数,传递一个参数给函数就可以了,我觉得这种方法最简单
      

  10.   

    TLoginForm = class(tfrom) procedure LoadUserInfo;
    end;TLoginForm.LoadUserInfo;
    begin
    end;function  ShowLoginForm():integer;
    begin
      with TLoginForm.Create(nil) do
      try
        LoadUserInfo;
        ShowModal;
      finally
        Free;
      end;
    end;