设置断点无效,该怎么处理

设置断点无效
自定义一个进程.
Procedure Tform1.DataToSQL(var Rbuffer:Array of BYTE;var M_ID:Cardinal;SaVetag:BYTE); 
var 
PhaC,AIS_M:String; (SaVetag进程定义)
 begin
  SaVetag:='11'
  PhaC:='9999.999';
  AIS_M:='1000000000';
  SaVetag:=SaVetag or $01; //表示不完整
 end

end之前4条语句,前3条都可以设置断点,最后一条无法设置断点,编译就 变绿色.
不知道是什么原因,在线等..

[解决办法]
Delphi对于在过程中不再使用的变量会自动优化掉，你可以在后面再使用一下，就可以设置断点了。
[解决办法]
SaVetag:BYTE和var SaVetag:BYTE 区别有哪些？

复制和引用的区别