B
buff
Unregistered / Unconfirmed
GUEST, unregistred user!
var
ShellWindow : IShellWindows;
nCount : Integer;
begin
while not terminateddo
begin
try
ShellWindow := CoShellWindows.Create;
nCount := ShellWindow.Count;
except
end;
sleep(1000);
end;
在Thread错误信息:标记没有引用存储
如果写在不写在Thread中,程序运行正常
ShellWindow : IShellWindows;
nCount : Integer;
begin
while not terminateddo
begin
try
ShellWindow := CoShellWindows.Create;
nCount := ShellWindow.Count;
except
end;
sleep(1000);
end;
在Thread错误信息:标记没有引用存储
如果写在不写在Thread中,程序运行正常