一个FORM.CAPTION的问题。

Question

定义一个变量char，该变量等于form1中某条数据信息。我想实现当Form2弹出时，Form2.Caption能够显示char中的数据。请问这个应该怎么实现呢？

Answer 1

在uses里加上Form1的单元名，就能赋值了

Answer 2

var char: string;Form2 的 OnShow 事件中,
 Self.Caption := Form1.char;

Answer 3

Procedure Form2.OnShow(Sender:Tobject);
Var
  aChar:String;
begin
  aChar:='第二个窗口!';
  Form2.Caption:=aChar; 
end;

Answer 4

可能是我的表达有一点的问题，我把我的环境说一下吧。
在form1上有一个dbgrid，当我双击dbgrid上面a信息后，使a中某一个内容在combobox上显示出来，之后单及击某个按钮，来显示form2，这个时候，我要实现form2.Caption能够显示form1中dbgrid的a信息中的另一个内容，我该怎么做呢？
我写了一段，可是没有放应。
form2.show的事件下写的
var 
  char1:string;
begin
 char1：＝Form1.Query1.fieldbyname('司机姓名').asstring;
 Form2.Caption:='char1基本信息';

Answer 5

uses unit2;
var 
  char1:string;
begin
  char1：＝Form1.Query1.fieldbyname('司机姓名').asstring;
  form2.caption := char1;
  form2.showmodal;
end;

Answer 6

试了一下还是不行，他只能显示char1，就没有显示其他的东西了。