怎么给动态打开窗口里的全局变量赋值

如何给动态打开窗口里的全局变量赋值？
A窗口
  public
  { Public declarations }
  tableName1:string;


动态打开A窗口
  with TFormClass(FindClass('T'+FormClassName)).Create(Application) do
  try
  if FindComponent('Edit14') <> nil then
  begin
  (FindComponent('Edit14') as TEdit).Text := id;
  end;

这是查找控件并赋值，那如何查找变量 tableName1 并赋值？

[解决办法]
可以试下
with TForm2(TFormClass(FindClass('T'+FormClassName)).Create(Application)) do
begin
.....
 tableName1:='测试';
.....
end;
[解决办法]
不是tform是窗口a的类名，也就是'T'+FormClassName这个类型。
[解决办法]
将tableName1 放在published域里就应该可以存取
[解决办法]
比如说a窗口类的定义这样的
type
TFormA=class(TForm)
//其他省略
end;
然后就这样写：
with TFormA(TFormClass(FindClass('T'+FormClassName)).Create(Application)) do
begin
tableName1:='测试';
end;