请问两个.pas文件的变量怎么传递??

解决方案 »

  1.   

    写到第2个.pas,然后1,2有引用3;
    或者交叉引用,1引用2,2引用1。注意药叉引用的时候一个在interface,一个在implementation引用,否则抱错。
      

  2.   

    miky(miky)可以!建议做个公共单元放一些变量/常量!
      

  3.   

    miky(miky)可以!
    uses XXX
      

  4.   

    对,Devchenxip(天天快乐) 的最好
      

  5.   

    两个.pas文件里的有些变量是不能传递的
    如:
    unit1.pasinterface
    var
    i:integer;procedure TForm1.Button1Click(Sender: TObject)
    var
      str :string;
    begin
      i := 10;
    .
    .
    .
    end;unit2.pas
    里,引用unit1uses
    unit1,......
    但不能用str变量,i是可以用的
    procedure TForm2.Button1Click(Sender: TObject);
    begin
      showmessage(inttostr(i));
    end;