请问:窗体参数传递怎么传?谢谢

Question

在Delphi中窗体之间参数传递怎么传?谢谢各位大哥!!!

Answer 1

http://community.csdn.net/Expert/topic/3640/3640955.xml?temp=.1216547

Answer 2

错了，是这个：
http://community.csdn.net/Expert/topic/3636/3636682.xml?temp=.3788568

Answer 3

type
  TfrmNewItem = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;var i: integer; //这里定义的就是对外可见的全局变量。
    frmNew: TfrmNew;implementationvar j: integer; //这里定义的就是单元全局变量。

Answer 4

最好不要用全局变量传参数，用property好了
Fstr: String;
property str: String read Fstr write Fstr;

Answer 5

你想在B 窗口用A窗口的参数,只要在B窗口中的USES中加入A窗口就可以了

Answer 6

１、在创建窗体后，显示窗体前，设置该窗体的属性。比如在A中引用B，然后创建B，接着设置B.xxx，就OK。
２、另外一个办法很好，用指针：
  type 
  _AAA = Record
    sPara1:String;
    vPara2:Variant;
  End;
  pAAA=^_AAA;
然后使用：
Var A:_AAA;
Begin
  FormB:=TFormB.Create(Self);
  AAA.sPara1:='参数一';
  FormB.pParamsPoint:=@A;
  FormB.Show;
End;
在FormB中：
Var A:_AAA;
Begin
  if pParamsPoint<>nil then A:=pAAA(pParamsPoint)^;   //取参数
....
End;