中国开发网: 论坛: 程序员情感CBD: 贴子 84165
haibing_168: 谁能解决?
在DELHPI的主线程中,我声明了一个对象:
type
tyw = class
public
TmpIntA: integer;
TmpIntB: integer;
TmpIntC: integer;
end;
pyw = ^tyw;

...

function ExecThread(tmpA,tmpB:integer);
var
yw : pyw;
fyw: tyw;
begin
fyw := tyw.Create;
yw := @fyw;
fyw.TmpIntA := 1;
fyw.TmpIntB := 2;
 if GetSumAB(yw) = 0 then         //这里GetSumAB(yw)是一个函数
showmessage(IntToStr(yw.TmpIntC));
end;

function GetSumAB(Tmpyw:pyw):integer;
begin
... //这里创建一个线程,在线程中执行fyw.TmpIntA和fyw.TmpIntB的和,然后赋给fyw.TmpIntC
end;

问题是怎样在子线程中访问主线程中yw的地址?

相关信息:


欢迎光临本社区,您还没有登录,不能发贴子。请在 这里登录