我在全局变量中定义了一个串列
BeginMoinfo , PMOinfo,Endmoinfo :Trecode;//Trecode为制定义类型;程序开始已经产生了一个串列。
我需要在在一个线程中用到这个串列;我的线程
procedure Thadd.Execute;
begin
Pmoinfo:=beginmoinfo; //A1
repeat
if pmoinfo.pointFieldS=nil then
begin
new(pointfieldSS);
Pmoinfo.pointFieldS:=PointFieldSs;
end;
Pmoinfo:=Pmoinfo.pointmoinfo;
until Pmoinfo=nil;
end;但是执行到 A1的时候,Pmoinfo 返回一个nil;并且跳过 Repeat-Until;我不知道是怎么回事!
在线等待!有重谢!
BeginMoinfo , PMOinfo,Endmoinfo :Trecode;//Trecode为制定义类型;程序开始已经产生了一个串列。
我需要在在一个线程中用到这个串列;我的线程
procedure Thadd.Execute;
begin
Pmoinfo:=beginmoinfo; //A1
repeat
if pmoinfo.pointFieldS=nil then
begin
new(pointfieldSS);
Pmoinfo.pointFieldS:=PointFieldSs;
end;
Pmoinfo:=Pmoinfo.pointmoinfo;
until Pmoinfo=nil;
end;但是执行到 A1的时候,Pmoinfo 返回一个nil;并且跳过 Repeat-Until;我不知道是怎么回事!
在线等待!有重谢!
解决方案 »
- 请教各位大师关于CreateRemoteThread和DLL呼出的问题
- 数据库查询出现错误-" 至少有一个参数没被指定值"
- delphi 2007 ShowMessage的问题
- adoquery对象在执行删除纪录的操作时,发生“无效的授权描述”异常,是什么原因?
- 急寻:access数据库备份,恢复的解决方法!谢谢!
- 问bde和ado的query和adoquery的用法
- 怎样使一个窗口在初始最大化后只能最小化和最大化?可以象vc的窗口那样使得最大化和最小中间的那个钮灰掉吗
- 看看这段代码
- 在delphi中調用sql server 的帶游標的存儲過程
- 想找电脑家教吗?
- 菜鸟问题 ,如何查询?来者有分
- 怎样初始化一个二维结构数组常量?如Shape : Array[0..9,0..9] of TPoint = (???);
请给出Trecode的定义!