当我添加 watch 的值时使用以下代码:
A[1, 1].IsX
并将断点放在下面的注释行上,监视列表显示此消息:
Type array [1..3] of TBLOCK is not a structure or union type.
而不是显示记录元素值。这是示例代码:
type
TBlock = record
IsX: Boolean;
IsO: Boolean;
IsEmpty: Boolean;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
A: array[1..9, 1..3] of TBlock;
begin
A[1, 1].IsX := True;
// add watch for A[1, 1].IsX and set the breakpoint on the following line
if A[1, 1].IsX then
ShowMessage('Prevent against debugger elimination.');
end;
来自监视列表的屏幕截图:
如何正确设置记录元素值的多维数组的监视?