超级难题，在线急等：TThread线程中调用其它窗体函数再调用自身问题

比如现在有个线程类

比如

procedure 线程类.Execute;
begin
  这里调用了在其它窗体中定义的函数A
end;


其它窗体：
function 函数A{

}

如何在函数A中调用线程类中的函数或者线程中的局部变量？

大家知道函数A中是线程调用的，也就是函数A中可以得到线程句柄、线程ID，但是我不懂怎么使用句柄去得到线程中的私有变量值？



注：由于是多线程，所以没办法在创建线程时赋值给局部变量，而且函数A中也没办法判断这是第哪个线程对象。

所以请教下大家碰到这种情况一般是怎么处理的？我卡在这里有一年多了。。。

有人在吗？急啊